Select Code to Download

#!/bin/perl -w
use strict;
...
print "Your encrypted Password: $ENCPASS\n";
print "Password from ypcat:     $Tr\n";