print "$verse => $Scripts{$verse}\n";