Help for this page
use strict; ... 33333 44444
use strict; use warnings; ... while (<DATA>) {print unless $. ~~ @unv}