Help for this page
#!/usr/bin/perl -w use strict; use CGI::Carp; ... unlink @files or die "Couldn't unlink files in $dir: $!"; # rest of your script