##
my $item = shift();
##
##
return sub
{
my $otherItem = shift();
print "I need to buy a $item and a $otherItem.\n";
};
##
##
&$itemInBasket( "pair of shoes" );
##
##
my $otherItem = shift();
print "I need to buy a $item and a $otherItem.\n";