in reply to Re^4: Extracting Unique elements
in thread Extracting Unique elements
Just use join instead of a loop:
print FH ref($bar) eq "ARRAY" ? join(',', @$bar) : $bar;
In Section
Seekers of Perl Wisdom
in reply to Re^4: Extracting Unique elements
in thread Extracting Unique elements
Just use join instead of a loop:
print FH ref($bar) eq "ARRAY" ? join(',', @$bar) : $bar;