canspice.org

I missed the beginning of this, so here’s just some notes and braindumps.

for $wq qw wq qw {
  print $wq;
}

…prints:

q
q

You can do things like @list = <Damian Matthew Lucifer Conway> and have it just work.

sub RESPECT { print "@_\n" }
(R.E.S.P.E.C.T)->('find out what it means to me');

Oh god.

sub *{'='} = sub { print "@_\n" };

or

*= = sub { print "@_\n" }

Damian is an evil evil man. You can change the name of anonymous subroutines:

my $anon1 = sub {
  local *__ANON__ = "Bruce";
  carp "We'll just call you Bruce, okay?";
};

That’s the only bit of useful stuff in this talk. Here comes some more useless scary stuff: while ( $count –> 0 ) {. $hash<-{$key} is a substitute for an empty string.

You can slurp a whole file in a single line: my $content = readline!open!((*{$!},$/)=\$file); — I think that’s right.

And that’s a wrap!