$prefix=test; $runid=12; unlink glob("$prefix$runid.*") || print"Error removing files $!\n";