push @activline, "$1 | $2 | $activ{$1} \n" if $activ{$1};