>perl -c \816493.pl
Possible unintended interpolation of @data_date in string at 816493.pl line 60.
Global symbol "@data_date" requires explicit package name at 816493.pl line 56.
syntax error at 816493.pl line 60, near "if"
Global symbol "@data_date" requires explicit package name at 816493.pl line 60.
Global symbol "@data" requires explicit package name at816493.pl line 65.
Global symbol "@data" requires explicit package name at 816493.pl line 67.
Global symbol "@data_date" requires explicit package name at 816493.pl line 67.
Global symbol "@recent" requires explicit package name at816493.pl line 68.
Global symbol "@data" requires explicit package name at 816493.pl line 68.
syntax error at 816493.pl line 71, near "}"
816493.pl had compilation errors.