Select Code to Download

sub foo*bar {
   return 42;
}

print foo*bar(), "\n";

my $name = "foo*bar";

...
};

print &$name(), "\n";

$ psql tai
psql (9.1.13)
...
tai=# DROP TABLE "foo";
DROP TABLE
tai=#