Help for this page
#!/usr/bin/perl use strict; ... print $_, "\n"; } };
select $process; $|=1; select $process;