#!/usr/bin/perl -wT
my $paco = shift; # get first argument from @ARGV, or the command line.
unlink $paco;