sub foo {shift}
sub bar {1}
print foo bar;