while(<>) {
        chomp;
        my $filename = $_;
        $filename =~ s/\$/\\\$/g;
        $filename =~ s/ /\ /g;
        $filename =~ s/\'/\\\'/g;
        print $filename ."\n";
        my $exec = `md5sum $filename`;
        print $exec ."\n";
}

##</code><code>##

find /tmp/ -type f | ./hash.pl <br>
/tmp/File Wasn\'t found.txt <br>
md5sum: /tmp/File: No such file or directory<br>
md5sum: Wasn't: No such file or directory<br>
md5sum: found.txt: No such file or directory<br>
<br>

##</code><code>##

while(<>) {
        chomp;
        my $filename = $_;
        $filename =~ s/\$/\\\$/g;
        $filename =~ s/ /\ /g;
        $filename =~ s/\'/\\\'/g;
        print $filename ."\n";
        my $exec = `md5sum '$filename'`;
        print $exec ."\n";
}

##</code><code>##

find /tmp/ -type f | ./hash.pl
/tmp/File Wasn\'t found.txt
sh: Syntax error: Unterminated quoted string