Con HTML::Parser non mi ci sono raccapezzato molto, quindi ho continuato con lo script più semplice.

Praticamente ho fatto:

while(<>) {
chomp;
s/<script.*?\/script>//i;
s/<.*?>//;
print;
}

e gli passo attraverso la linea di comando il file html.
Lo script mi toglie tutti gli "accapi" e poi mi toglie tutti i tag. La sostituzione del contenuto del tag script continua a non eseguirla. Perché?
A questo punto non dovrei aver bisongo di /m, perché è tutto su una linea sola...