$ perl -e '$|=1; print "$main::|\n";'
|