sub new {
...
}

sub doSomething {
$f->methodX();
}