path: root/bar

#!./perl

sub foo;

foo;