use Win32::ErrorMode qw( :all );
my $error_mode = GetErrorMode();
SetErrorMode(SEM_FAILCRITICALERRORS | SEM_NOGPFAULTERRORBOX);
system "program_that_would_normal_produce_an_error_dialog.exe";
#bzw hier dein Code für die Laufwerke