tldr/pages/common/perl.md

21 lines
701 B
Markdown

# perl
> The Perl 5 language interpreter.
> More information: <https://www.perl.org>.
- Print lines from `stdin` [m/] matching regex1 and case insensitive [/i] regex2:
`perl -n -e 'print if m/{{regex1}}/ and m/{{regex2}}/i'`
- Say [-E] first match group, using a regexp, ignoring space in regex [/x] :
`perl -n -E 'say $1 if m/{{before}} ( {{group_regex}} ) {{after}}/x'`
- [-i]n-place, with backup, [s/] substitute all occurrence [/g] of regex with replacement:
`perl -i'.bak' -p -e 's/{{regex}}/{{replacement}}/g' {{path/to/files}}`
- Use perl's inline documentation, some pages also available via man on linux:
`perldoc perlrun ; perldoc module ; perldoc -f splice; perldoc -q perlfaq1`