$line =~ s/^$pattern//;

##</code><code>##


##</code><code>##


##</code><code>##