[v@vonunov ~/perl]$ ./get-wus-bad.pl infile.txt outfile.txt
Can't locate object method "getElementsByClassName" via package "HTML::TagParser::Element" at ./get-wus-bad.pl line 31, <$infh.