splitte streng i perl

[uNF]

0: M
1: a
2: g
3: n
4: u
5: s
6:

7:
8:

9: M
10: ø
11: l
12: b
13: a
14: c
15: h
16:

 

 

strengen vises ved:

 

$count = 0;
#print \n;
$kontakttemp = @kontaktt;
while ($count <= $kontakttemp) {##
       print "$count: " . $kontaktt[$count], "\n";
       $count ++;
}

 

Trenger å splitte strengen rundt index 6,7,8. dvs jeg trenger å splitte på spaces \n'er og \n'ter. Funker ikke så splitte med \n\n\n. Noen som gjetter hvordan?

Endret 26. oktober 2006 av uNF

[uNF]

løste seg.

split('\n \n', $kontaktt)