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/