#!/usr/bin/perl

use Empleado3;

$e1=new Empleado3("Juan Pérez", "3.141.159-2", 350000);
$e2=new Empleado3("Pedro González", "2.718.281-8", 390000);
print "Hay ", Empleado3->nemp, " empleados\n";
$e1=0;
print "Hay ", Empleado3->nemp, " empleados\n";