while() { ($receiver,$uptime) = split; if ($DEBUG == 'TRUE') { # test split values, make sure you've # printed a header already print "testing: reciever = $reciever : uptime = $uptime
"; } push @dataset, $uptime; push @labels, $receiver; }