dalo by sa to imho elegantne vyriesit cez nejaku regular expression, mam pocit ze v tomto je perl dost dobry.. ale asi len v pripade, ze sa chces naucit nieco o regular expressions... mne chvilu trvalo kym som pochopil wtf...

tento riadok vymeni v $text-e 'bla' za 'BLA'
$text =~ s/bla/BLA