Skip to content

Instantly share code, notes, and snippets.

Created January 22, 2011 10:54
Show Gist options
  • Star 0 You must be signed in to star a gist
  • Fork 0 You must be signed in to fork a gist
  • Save anonymous/791039 to your computer and use it in GitHub Desktop.
Save anonymous/791039 to your computer and use it in GitHub Desktop.
#! /usr/local/perl6
use v6;
sub sayer(Str $what){
return sub ($next?){
return $what if !$next;
return $what ~ $next();
}
}
my &i := &sayer("i");
my &love := &sayer("love");
my &you := &sayer("you");
say i love you;
===SORRY!===
Confused at line 16, near "say i love"
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment