Help for this page
>perl -wMstrict -le "my @lines = ( ... '12300 12301 12398 12399 12400 12401 12498 12499 12500 12501'