NAME

Tie::PerFH - creates scalars specific to a filehandle

SYNOPSIS

  use Tie::PerFH;
  use strict;

  tie my($font), 'Tie::PerFH';

  # $font is 'blue' when STDOUT is select()ed
  $font = "blue";

  select OTHER_FH;

  # $font is 'red' when OTHER_FH is select()ed
  $font = "red";

DESCRIPTION

This module creates scalars that hold different values depending on which filehandle is selected (much like the format variables, and the autoflush variable).

AUTHOR

  Jeff "japhy" Pinyan
  CPAN ID: PINYAN
  japhy@pobox.com
  http://www.pobox.com/~japhy/