for my $input ($form->inputs) {
    if (q{FileName} eq $input->{name}){
		print Dumper($input); # Show First output block
		
		my $hash = $input->{menu}[0]; # '$hash' not '%hash'
		# $hash is the first button
		print Dumper($hash);
		
		# to iterate the radio button values
		my $menu = $input->{menu};
		for my $button ( @$menu ) {
			my $file = $button->{value};
			print "$file\n";
		}
	}      
}