Help for this page
use strict; use warnings; ... push @{$sbernpu{$#NETI}}, ''; print "@{$sbernpu{$#NETI}}\n";