Help for this page

Select Code to Download

Select or download this
```
while (<>) {...}
```

Select or download this

pilsner:~ [11:58:42]$ perl -MO=Deparse -e 'while (<>) {}'
while (defined($_ = <ARGV>)) {
...
    ();
}
-e syntax OK