$string =~ s/^(.{15}).+$/$1/;