for my $field(@printerstat) { print "$field\n"; }