Select Code to Download

#!/usr/bin/env perl
use strict;
...

# I meant this
print crypt("secret",'$6$salt');

#!/usr/bin/env perl
use strict;
...

my $hash = hash('blahblah');
print "match" if checkHash($hash,'blahblah');