Aye, you can use shift as though it's a variable. I do many a
print shift;. It saves on typing and stress of coming up with yet ANOTHER unique variable name.
UPDATE: Adding code for the original question
#!/usr/bin/perl
use warnings;
use strict;
my @list;
push(@list, "blah.txt"), print qq(Error\n) unless unlink "blah.txt";
print @list;
"Age is nothing more than an inaccurate number bestowed upon us at birth as just another means for others to judge and classify us"
sulfericacid