Perl — STDIN and pattern matching oner liner

PERL.md

Perl — STDIN and pattern matching oner liner

Use this syntax.

<> =~ /[PATTERN]/

Example. Simple word match

echo "Alice" | perl -e 'print "Here is Alice\n" if ( <> =~ /Alice/ )'
Here is Alice

Example. Regex match

echo "Alice" | perl -e 'print "Here is Alice\n" if ( <> =~ /^Al.ce$/ )'
Here is Alice

Example. Regex capture

echo "Alice" | perl -e 'print "Here is Ali${1}${2}\n" if ( <> =~ /Ali(.)(.)/ );'
Here is Alice

echo "Alien" | perl -e 'print "Here is Ali${1}${2}\n" if ( <> =~ /Ali(.)(.)/ );'
Here is Alien

NOTE

• <> means STDIN
• -e option for one liner

Ref

• perlrequick - perldoc.perl.org

Version

• bash 4.2
• perl v5.28.0

Links

• Medium—imported