Select Code to Download

#!/usr/bin/perl

...

#  All done, print it out
print $table;

Nombre Apellido E-mail    Direccion Telefono
====== ======== ======    ========= ========
John   Matt     J_m@gmail Park av.  465512
Math   Perry    ....      .....     ....
Julie  ....     ....      .....     .....

$VAR1 = [
          {
...
            'phone' => '.....'
          }
        ];