#ex_13-1
#Learning Perl, Appendix A, Exercise 13.1
unlink(@ARGV);