or   Register or Register today to make and share your own cheat sheets! (Why Join?)

Cheatography Login

Join Us!

Not a Cheatographer? Register here!

Social Media

You can login to or register with Cheatography using your Facebook or Twitter account!

Why Join Cheatography?

Make and share cheat sheets!
Join a great community of Cheatographers and add your very own contributions.

Save your favourites!
Quick access to your most loved cheat sheets.

Fewer ads!
Members see no ads on the site.

Coming soon ...
Requests, ratings and more!

Why Join Cheatography?

Make and share cheat sheets!
Join a great community of Cheatographers and add your very own contributions.

Save your favourites!
Quick access to your most loved cheat sheets.

Fewer ads!
Members see no ads on the site.

Coming soon ...
Requests, ratings and more!

perlcheat Cheat Sheet by mishin

2 Comments   |   Add a Comment   |   PDF Download   |   Find:

About Perlcheat

AUTHOR Juerd Waalboer, with the help of many Perl Monks.
the original PM post http:/­/pe­rlm­onk­s.o­rg/­?no­de_­id=­216602
Damian Conway's Perl 6 version http:/­/pe­rlm­onk­s.o­rg/­?no­de_­id=­238031
home of the Perl Cheat Sheet http:/­/ju­erd.nl­/si­te.p­lp­/pe­rlcheat

CONTEXTS

void
scalar
list

SIGILS

$scalar
@array
%hash
&sub
*glob

ARRAYS,HASHES

  ARRAYS HASHES
whole: @array %hash
slice: @array[0, 2] @hash{'a', 'b'}
element: $array[0] $hash{'a'}

SCALAR VALUES

number, string, reference, glob, undef

SYNTAX

for (LIST) { }, for (a;b;c) { }
while ( ) { }, until ( ) { }
if ( ) { } elsif ( ) { } else { }
unless ( ) { } elsif ( ) { } else { }
for equals foreach (ALWAYS)

LINKS

Search the CPAN - metacp­an.org https:­//m­eta­cpa­n.org
Perl Weekly http:/­/pe­rlw­eek­ly.c­om­/la­tes­t.html
Perl­Monks - The Monastery Gates http:/­/ww­w.p­erl­mon­ks.org/
What's happening in the world of Perl progra­mming, including Perl 5, Perl 6, the CPAN and Parrot? http:/­/pe­rlb­uzz.com/
The Compre­hensive Perl Archive Network - www.cp­an.org http:/­/cp­an.org
News and views of the Perl progra­mming language http:/­/ww­w.p­erl.com/
Perl progra­mming docume­ntation - perldo­c.p­erl.org http:/­/pe­rld­oc.p­er­l.org/
Perl Confer­ences, YAPCs, Workshops, and Hackathons http:/­/ww­w.y­apc.org/
Perl 6 http:/­/pe­rl6.org/
Perl 6 Tablet 2 - Basic Syntax http:/­/ta­ble­ts.p­er­l6.o­rg­/ta­ble­t-2­-ba­sic­-sy­nta­x.html
Learn Perl - learn.p­er­l.org http:/­/le­arn.pe­rl.org/
Perl - Download http:/­/ww­w.p­erl.or­g/g­et.html
The Perl.org Online Library http:/­/ww­w.p­erl.or­g/b­ook­s/l­ibr­ary.html
Books and More (Videos) http:/­/ww­w.p­erl.or­g/m­edi­a.html
Padre, the Perl IDE http:/­/pa­dre.pe­rli­de.org/
perlcheat http:/­/pe­rld­oc.p­er­l.o­rg/­per­lch­eat.html
Gabor Szabo Perl Trainer and develo­per http:/­/sz­abg­ab.com/
Perl,Perl Monger­s,M­ong­ers­,User Group,­Meeting http:/­/pm.org
Facebook vs Google+ for Perl projects http:/­/sz­abg­ab.c­om­/fa­ceb­ook­-vs­-go­ogl­e-p­lus­-fo­r-p­erl­-pr­oje­cts.html
Lections about Per from Gabor Szabo http:/­/ww­w.y­out­ube.co­m/r­esu­lts­?se­arc­h_q­uer­y=g­abo­r+perl
mod_perl world http:/­/pe­rl.a­pa­che.org
Interp­reted Languages: PHP, Perl, Python, Ruby (Sheet One) http:/­/hy­per­pol­ygl­ot.o­rg­/sc­ripting
Moose - A postmodern object system for Perl http:/­/mo­ose.ii­nte­rac­tiv­e.com/
Perl Training Australia - Perl Tips http:/­/pe­rlt­rai­nin­g.c­om.a­u/­tips/
Basic Perl (Ynon Perek | An Amazing Learning Experi­ence) , super http:/­/yn­onp­ere­k.c­om/­cou­rse­s/b­asi­c-p­erl.html
Perl Questions - Stack Overflow http:/­/st­ack­ove­rfl­ow.c­om­/qu­est­ion­s/t­agg­ed/­per­l?s­ort­=fa­q&­pag­esi­ze=15
Perl - Cheat sheets Collection http:/­/pe­rl4­eve­ryt­hin­g.b­log­spo­t.c­om/­201­0/1­2/p­erl­-ch­eat­-sh­eet­s-c­oll­ect­ion.html
comp­lete, working examples of good Perl code http:/­/pe­rlm­eme.or­g/s­tar­t_h­ere­/in­dex.html
Perl Progra­mming Tutorials http:/­/ww­w.d­evs­hed.co­m/c­/b/­Perl/
Video from UniverTV http:/­/un­ive­rtv.ru­/se­arc­h/?­txt­=pe­rl&x=­0&y=0
FAQ по perl и програ­мми­рованию для web http:/­/ww­w.c­ybe­rgu­ru.r­u/­web­/we­b-p­rog­ram­min­g/p­erl­-we­b-p­rog­ram­min­g-f­aq-­pag­e2.html
FAQ PERL Agava http:/­/ho­sti­ng.a­ga­va.r­u/­faq­/te­ch/­doc­s/p­erl.shtml

Modern::Perl

Modern­::Perl
enable all of the features of Modern Perl with one import
Toolkit
use Toolkit; and put all your favorite modules in a file: > cat $PERL5­LIB­/To­olk­it/­Mac­ros­/AL­WAY­S/M­odules use strict; use warnings; use Carp; use Smart:­:Co­mments;
use common­::s­ense;
supposed to be the same, with much lower memory usage, as: # # use strict qw(vars subs); # use feature qw(say state switch); # no warnings; # use warnings qw(FATAL closed threads internal debugging pack substr malloc # unopened portable prototype inplace io pipe unpack regexp # deprecated exiting glob digit printf utf8 layer # reserved parent­hesis taint closure semico­lon); # no warnings qw(exec newline);
latest
There is latest, which is no longer the latest. Demons­trates part of the naming problem.
uni::perl
Also, uni::perl which adds enabling unicode part of the mix.
ToolSet
ToolSet offers a subset of Toolkit's abilities, but without source filters.
Moose
I'll include Moose here, since it automa­tically adds strict and warnings to the calling package.
Acme::­Ver­y::­Mod­ern­::Perl
Using this module, you'll get Modern­::Perl, Toolkit, latest, uni::perl, perl5i, and common­::sense with just one simple line.
Source
 

REGEX METACHARS

^ string begin
$ str. end (before \n)
+ one or more
* zero or more
? zero or one
{3,7} repeat in range
() capture
(?:) no capture
[] character class
| altern­ation
\b word boundary
\z string end
http:/­/pe­rld­oc.p­er­l.o­rg/­per­lre.html

Perl image

REGEX CHARCLASSES

. [^\n]
\s [\x20\­f\t­\r\n]
\w [A-Za-­z0-9_]
\d [0-9]
\S, \W and \D negate

REGEX MODIFIERS

/i case insens.
/m line based ^$
/s . includes \n
/x ign. wh.space
/g global
\Q quote (disable) pattern metach­ara­cters till \E
\E end either case modifi­cation or quoted section, think vi

FUNCTION RETURN LISTS

stat localtime caller
0 dev 0 second 0 package
1 ino 1 minute 1 filename
2 mode 2 hour 2 line
3 nlink 3 day 3 subroutine
4 uid 4 month-1 4 hasargs
5 gid 5 year-1900 5 wantarray
6 rdev 6 weekday 6 evaltext
7 size 7 yearday 7 is_require
8 atime 8 is_dst 8 hints
9 mtime   9 bitmask
10 ctime just use  
11 blksz POSIX:: 3..9 only
12 blcks strftime! http:/­/do­cst­ore.mi­k.u­a/o­rel­ly/­per­l/p­rog­3/c­h32­_36.htm with EXPR

opendir & grep:

opendi­r(D­IR,­"­$SC­AND­ATA­");
@files = sort(g­rep­(/[­0-9­]\.[0­-9]­\-­/,r­ead­dir­(DI­R)));
closed­ir(­DIR);

hash iteration:

while (($key­,$val) = each (%hash)) { }

getopt

Perl IDE

 

Escape sequences

\t tab (HT, TAB)
\n newline (LF, NL)
\r return (CR)
\f form feed (FF)
\a alarm (bell) (BEL)
\e escape (think troff) (ESC)
\cK control char (example: VT)
\x{}, \x00 character whose ordinal is the given hexade­cimal number
\N{name} amed Unicode character or character sequence
\N{U+263D} Unicode character (example: FIRST QUARTER MOON)
\o{}, \000 character whose ordinal is the given octal number
\l lowercase next char (think vi)
\u uppercase next char (think vi)
\L lowercase till \E (think vi)
\U uppercase till \E (think vi)
\Q quote (disable) pattern metach­ara­cters till \E
\E end either case modifi­cation or quoted section, think vi

REFERENCES

\ $$foo[1] ==
references $foo->[1]
$@%&* $$foo{­bar}==
derefe­rence $foo->­{bar}
{} ${$$fo­o[1­]}[2]==
anon. hashref $foo->­[1]­->[2]
\() ${$$fo­o[1­]}[2]==
list of refs $foo->­[1][2]

SPECIAL VARIABLES

$_ default variable
$0 program name
$/ input separator
$\ output separator
$| autoflush
$! sys/li­bcall error
$@ eval error
$$ process ID
$. line number
@ARGV command line args
@INC include paths
@_ subroutine args
%ENV enviro­nment

NUMBERS vs STRINGS

NUMBERS STRINGS
= =
. .
== != eq ne
< > <= >= lt gt le ge
<=> cmp

DO

use Modern­::Perl;
use strict;
use warnings;
my $var;
open() or die $!;
use Modules;

DON'T

"­$fo­o"
$$vari­abl­e_name
`$user­input`
/$user­input/

capitalizing:

word: $foo = ucfirst lc $foo;
each word: $foo =~ s/(\w+­)/\­u\L­$1/g;

referencing a subroutine:

$SUBNAME = "­jun­k";
&$­SUB­NAM­E(@­PAR­AME­TERS);

foreach:

foreach $FILE (@FILES) { }

OPERATOR PRECEDENCE

->
++ --
**
! ~ \ u+ u-
=~ !~
* / % x
+ - .
<< >>
named uops
< > <= >= lt gt le ge
== != <=> eq ne cmp
&
| ^
&&
||
.. ...
?:
= += -= *= etc.
, =>
list ops
not
and
or xor

Link to perl cheat
Pinterest

Favourited by 1 Member:

gamiclea

Comments

DaveChild DaveChild, 08:34 2 Jun 12

Great cheat sheet, mishin! Loads of info :)

mishin mishin, 09:18 2 Jun 12

Thanks, Dave, cool engine!

Add a Comment

Comment:

Contents

This 'cheat sheet' is a handy reference, meant for beginning Perl progra­mmers. Not everything is mentioned, but 194 features may already be overwh­elming. http:/­/se­arc­h.c­pan.or­g/~­nwc­lar­k/p­erl­-5.8.7­/po­d/p­erl­che­at.pod

Column Content Comments Author Updated
- perlcheat Cheat Sheet mishin 2 Jul 12
1 About Perlcheat 0 mishin 4 Jun 12
CONTEXTS 0 mishin 1 Jun 12
SIGILS 0 mishin 1 Jun 12
ARRAYS,HASHES 0 mishin 1 Jun 12
SCALAR VALUES 0 mishin 1 Jun 12
SYNTAX 0 mishin 1 Jun 12
LINKS 0 mishin 2 Jul 12
Modern::Perl 0 mishin 1 Jul 12
2 REGEX METACHARS 0 mishin 1 Jun 12
Perl image 0 mishin 7 Jun 12
REGEX CHARCLASSES 0 mishin 1 Jun 12
REGEX MODIFIERS 0 mishin 1 Jun 12
FUNCTION RETURN LISTS 0 mishin 5 Jun 12
opendir & grep: 0 mishin 2 Jun 12
hash iteration: 0 mishin 2 Jun 12
getopt 0 mishin 5 Jun 12
Perl IDE 0 mishin 12 Jun 12
3 Escape sequences 0 mishin 1 Jun 12
REFERENCES 0 mishin 1 Jun 12
SPECIAL VARIABLES 0 mishin 1 Jun 12
NUMBERS vs STRINGS 0 mishin 1 Jun 12
DO 0 mishin 1 Jun 12
DON'T 0 mishin 1 Jun 12
capitalizing: 0 mishin 2 Jun 12
referencing a subroutine: 0 mishin 2 Jun 12
foreach: 0 mishin 2 Jun 12
OPERATOR PRECEDENCE 0 mishin 1 Jun 12
Link to perl cheat 0 mishin 2 Jul 12

Cheatographer

mishin mishin
mishin.narod.ru

More by mishin

Cheat Sheet Stats

970 Downloads and 2,186 Views

Tags

perl, perlcheat

Related (shares tags with):

Thumbnail