sub foo () { return "foo\n" } sub bar { return "bar\n" } *foo = \&bar;