print "optag: ".$config{opt_tag4_notref}."\n"; if (length($config{opt_tag4_notref})>0){ my(@opt_tags) = split( /|/, $config{opt_tag4_notref} ); foreach (@opt_tags) { push(@header_list, "opt. tag ".$_.""); } print Dumper(@opt_tags); }