...
use CGI;

my $form = CGI->new();

if ( $form->param('action'} eq "delete" ) {
   my @files_to_delete = $form->param('chosen_files');
   unlink join ",", @files_to_delete;
}
...