566 B
566 B
perl
The Perl 5 language interpreter. See also:
perldoc. More information: https://perldoc.perl.org/perl.
- Print lines from
stdin[m]atchingregex1and case [i]nsensitiveregex2:
perl -n -e 'print if m/regex1/ and m/regex2/i'
- Say ([-E]) first match group, using a
regex, ignoring space ([x]) inregex:
perl -n -E 'say $1 if m/{{before}} ( {{group_regex}} ) {{after}}/x'
- [i]n-place, with backup, [s]ubstitute all occurrence ([g]) of
regexwith a replacement:
perl -i'.bak' -p -e 's/regex/{{replacement}}/g' {{path/to/files}}