C:\Perl\working>perl towers2.pl
Not enough arguments for map at towers2.pl line 32, near """)"
Global symbol "$polea" requires explicit package name at towers2.pl line 32.
Global symbol "$poleb" requires explicit package name at towers2.pl line 32.
Global symbol "$polec" requires explicit package name at towers2.pl line 32.
Global symbol "$polea" requires explicit package name at towers2.pl line 84.
Global symbol "$poleb" requires explicit package name at towers2.pl line 84.
Global symbol "$polec" requires explicit package name at towers2.pl line 84.
Execution of towers2.pl aborted due to compilation errors (#1)
    (F) The function requires more arguments than you specified.

Uncaught exception from user code:
        Not enough arguments for map at towers2.pl line 32, near """)"
Global symbol "$polea" requires explicit package name at towers2.pl line 32.
Global symbol "$poleb" requires explicit package name at towers2.pl line 32.
Global symbol "$polec" requires explicit package name at towers2.pl line 32.
Global symbol "$polea" requires explicit package name at towers2.pl line 84.
Global symbol "$poleb" requires explicit package name at towers2.pl line 84.
Global symbol "$polec" requires explicit package name at towers2.pl line 84.
Execution of towers2.pl aborted due to compilation errors.
 at towers2.pl line 91