$text =~ /copying(.*)from/ or die "Couldn't find the pattern";
my $msg = $1;