Select Code to Download

my @cksums;
my @files = `find $path -type f`; # apologies to etcshadow
chomp @files;

push @cksums, `cksum $_` for ( @files );

my @cksums = `find $path -type f | xargs cksums`;

time perl -e '@cksums = `find . -type f -print0 | xargs -0 cksum`'

...
 open(I,"find . -type f -print0 |" );
 open(SH,"|/bin/sh");
 while (<I>) { chomp; print SH "cksum \"$_\" > /dev/null\n" }'