Help for this page

Select Code to Download


  1. or download this
    
use warnings;
...
  print shift;
}
__END__
  2. or download this
    % perl -le 'print join "\t", map 'item'.int(rand 500), 1..5 for 1..100
+0' \
| sort -k 5,5 | gzip > mongo.gz
...
item121 item479 item258 item301 item4
item3   item480 item187 item269 item4
item278 item327 item252 item459 item5