perl -i.bak -ne 'next unless /(\d{5}+)$/ && $1 > 713 && $1 < 99930' *.dat