$fileName = $q->param('deletetarget');
    printf ("File to be deleted: [%s]\n", "$fileName");
    unlink( $fileName );