substr( $line, -2, 2, '' ) if $line =~ /sum/;

##</code><code>##

substr( $line, -3, 2, '' ) if $line =~ /sum/;