tldr/pages/common/perl.md

37 lines
1010 B
Markdown
Raw Normal View History

2016-11-05 19:14:19 +00:00
# perl
> The Perl 5 language interpreter.
2019-05-29 14:53:42 +01:00
> More information: <https://www.perl.org>.
2016-11-05 19:14:19 +00:00
- Parse and execute a Perl script:
2016-11-05 19:14:19 +00:00
`perl {{script.pl}}`
- Check syntax errors on a Perl script:
2016-11-05 19:14:19 +00:00
`perl -c {{script.pl}}`
2016-11-05 19:14:19 +00:00
- Parse and execute a Perl statement:
2016-11-05 19:14:19 +00:00
`perl -e {{perl_statement}}`
2016-11-05 19:14:19 +00:00
- Run a Perl script in debug mode, using `perldebug`:
2016-11-05 19:14:19 +00:00
`perl -d {{script.pl}}`
2017-04-15 16:48:00 +01:00
- Loo[p] over all lines of a file, editing them [i]n-place using a find/replace [e]xpression:
2017-04-15 16:48:00 +01:00
`perl -p -i -e 's/{{find}}/{{replace}}/g' {{filename}}`
- Run a find/replace expression on a file, saving the original file with a given extension:
2017-04-15 16:48:00 +01:00
`perl -p -i'.old' -e 's/{{find}}/{{replace}}/g' {{filename}}`
2017-05-13 17:01:12 +01:00
- Run a multiline find/replace expression on a file, and save the result in another file:
2017-05-13 17:01:12 +01:00
`perl -p0e 's/{{foo\nbar}}/{{foobar}}/g' {{input_file}} > {{output_file}}`
- Run a regular expression on stdin, printing out the first capture group for each line:
`cat {{path/to/input_file}} | perl -nle 'if (/.*({{foo}}).*/) {print "$1"; last;}'`