next if not /^$pattern/;