doesn’t work

./check_amanda.pl -v
Type of arg 1 to keys must be hash (not hash element) at ./check_amanda.pl line 532, near “} ) ”
Type of arg 1 to keys must be hash (not hash element) at ./check_amanda.pl line 542, near “} ) ”
Type of arg 1 to keys must be hash (not hash element) at ./check_amanda.pl line 660, near “} ) ”
Type of arg 1 to keys must be hash (not hash element) at ./check_amanda.pl line 668, near “} ) ”
Execution of ./check_amanda.pl aborted due to compilation errors.

this perl script doesn’t work