use FileHandle;

    my $out = new FileHandle ">&STDOUT";
    autoflush $out;

    my $in = new FileHandle "<&STDIN";