while (defined($_ = <STDIN>)) {
    print $_;
}
- syntax OK