my $fh = \*STDIN;