$value =~ s/kus//;

##</code><code>##

($value) = $value =~ /(\d+)/;