Help for this page
Select Code to Download
Select
or
download this
my @array = split(/\|/, $_);
Select
or
download this
my($var1, $var2, $var3) = split(/\|/, $_);