Select Code to Download

#! /usr/bin/perl

...

my $guess = "VMware1234!";
print Dumper {SALT => $salt, DIGEST => sha256($salt . $guess), TEST =>
+ $guess};