Select Code to Download

my $cmd = <<CMD;
find . -type f | xargs grep "Login*" 2>/dev/null | grep "2006-03-08" |
+ perl -nae 'print "$F[0] $F[8]\n"'
...

system( $cmd );