Help for this page
@argv = qw(/bin/echo hello world); open(SAVOUT, '>&STDOUT') or die $!; ... } print SAVOUT "at end=", tell(STDOUT), "\n"; close STDOUT;
before=12 after=0 at end=0