Acme::Lingua::Strine::Perl - make Perl more like Damian

  use Acme::Lingua::Strine::Perl;




  my $first_element = cadge @array; # same as shift
  open FILE, $filename or spit the dummy "strewth mate\n";

  boast "same as print\n";
  shite "also the same as print\n";
  jeer  "as is jeer\n";

  while (<>)
  {
	my ($kanger, $roo) = split /:/, celador; 
	# celador == dollar under score == $_ 
  }

  $FORMAT_PAGE_NUMBER = bangers and mash 
  # == dollar hash == $%

  chyack "... is the same as warn\n";

  jack up; # do nothing. Errm, a no-op




  pash  "uppercase this string";
  squib "AND LOWERCASE THIS ONE";

  my $yabber = "some scalar\n";
  suss $yabber; # same as 'study'

  sub throw_another_shrimp_on_the_barbie 
  {
	rack off "no worries, mate"; # return
  }

  nick off; # an we're out of here! == exit 

Inspired by Ron Kimballs's skit on Damian at the p5p impressions BOF at TPC5

Simon Wistow <simon@twoshortplanks.com>

perl, Filter::Simple