A minor point but you don't have to escape single-quotes in a double-quoted string.

$ cat xxx
$key = 'abc';
print "Key is: '$key'\n";
$ perl xxx
Key is: 'abc'
$
[download]

I hope this is useful.