Help for this page

Select Code to Download


  1. or download this
    my $data = "f1|f2|f3|f4|f5";

my @data = split /|/, $data;

print $data[2], "\n";  # prints f3, of course- arrays start on 0.
  2. or download this
    my $data = "f1|f2|f3|f4|f5";

my ($clliA, $clliZ) = (split /|/, $d)[1,3];
# $clliA = "f2"
# $clliZ = "f4"