Help for this page
#!/bin/perl -w use strict; ... # in scope any more $p->("tutu"); # but $p still uses it
obj: toto - tata obj: toto - titi obj: foo - tutu obj: foo - tutu