#!/usr/bin/env perl use Dolgozo; $janos = new Dolgozo( "Nagy", "János", "1980-01-01", 850000); print $janos->{_nev}." "; print $janos->{_szuletes}."\n"; print $janos->{_fizetes}."\n";