perl 872641.pl
Global symbol "$first_agr" requires explicit package name at 872641.pl line 24.
Bareword "findfile" not allowed while "strict subs" in use at 872641.pl line 24.
Execution of 872641.pl aborted due to compilation errors.