in reply to Re: Parse the text file output and delete files
in thread Parse the text file output and delete files

Slight (hehehe) tweak for case insensitive.

#!/usr/bin/perl use warnings; use strict; $| = 1; do{ local $/; $_ = <> }; $1 =~ /[\0-\xff]*^executing: \@(.+)/m and (unlink $1 or warn "$1 $!") while /(.*?)ERROR at/gi;