while (<>) { print if lc(join '',sort split//) =~ /e.*l.*p.*r/; }