$line =~ s/\d;\d\dm//g;