Select Code to Download

$VAR1 = bless( {
                 'type' => 'radio',
...
                 'name' => 'FileName',
                 '/' => '/'
               }, 'HTML::Form::ListInput' );

$VAR1 = 'HASH(0x7fd53685e830)';
$VAR2 = undef;

for my $input ($form->inputs) {
    if (q{FileName} eq $input->{name}){
...
        #}    
    }      
}