Help for this page
%printers = list_printers().
my @printers = @{ $data{name} }; my @ports = @{ $data{port} };