my $systemCommand = "sha1sum $file > data"; print "\$systemCommand = [$systemCommand]\n"; system( $systemCommand );