Help for this page

Select Code to Download


  1. or download this
    
$scalar, @array = split ' ', $_
  2. or download this
    perl -MData::Dump -lane "my($scalar,@array)=split; dd $scalar; dd @arr
+ay" exampledata.txt
"A"
...
"E"

("example", "estinguished")
  3. or download this
    
perl -MData::Dump -lane "$HoA{$F[0]} = [ @F[1..$#F] ]; END{dd %HoA}" e
+xampledata.txt
...
  ["example", "estinguished"],
)