package Foo;
use Class::Std;

package main;

$obj = Foo->new();
$obj = Bar->new();



syntax highlighted by Code2HTML, v. 0.9.1