$fh = \*STDIN;
    $line = <$fh>;