$ perl -Mstrict='}, print +("First Line"), qw {' -pwle1 your_file