Select Code to Download

if ($form{$key} && $form{$key} =~ /\w+/) { # ...

my ($self,$asdf) = @_;
$asdf ||= '';