quote - capslock

git-svn-id: https://jules.scsys.co.uk/repository/shadowcat-code/scratchpad/matthewt/sig/lib@2408 8a6f57db-631f-0410-b083-dc7c4259d016

diff --git a/quotefile b/quotefile
index 2b05be1..8567afd 100644 (file)
--- a/quotefile
+++ b/quotefile
@@ -8370,3 +8370,8 @@ if you experience an election lasting more than 4 hours. ***
     he notices at the top of the screen is mst tweeting "clearly the solution
     is to have your nipples amputated before you give your next demo"
 < Mithaldu> business as usual
+%
+< xenu> in xperl push() will be replaced with unpop()
+< Grinnz> or replace unshift() with ctrl()
+< mauke> my $foo = shift @a; my ($x, $y, $z) = capslock @a;
+< mauke> sub capslock :prototype(\@) { splice @{$_[0]} }