$outputlist[$_] = /^0/
[download]

One problem is that you need to use the binding operator =~

It might be easier to use split:

use warnings;
use strict;

while (<DATA>) {
    chomp;
    if (s/^\s+//) {
        my @cols = split;
    }
}

__DATA__
Queue counters:  Queued packets  Trans packets   Dropped pak
    0            258520344       520344                    0
    1            11006822       1006822                    0
    2            832114        0832114                    0
    3            8294677        8294677                    0
    4            5416057        5416057                    0
[download]