You need to be aware that split works on a regexp therefore the /./ is matching any character. I'm not sure what you vars $projectnumber and $pa are but I'll assum you want something like this....
$string = '500/00-7.1.19.3'; # This will split the whole string at once retaining only the digits for each lhs variable. ($a,$b,$c,$d,$e,$f) = split /\D+/, $string; # This will split the whole string at once on any of the three characters / - . for each lhs variable.($a, # You don't really need to escape the characters, I do just so I don't have to think about it. ($a,$b,$c,$d,$e,$f) = split /[\-\/\.]/, $string; -----Original Message----- From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED] Behalf Of Jon Shorie Sent: Wednesday, April 14, 2004 1:13 PM To: [EMAIL PROTECTED] Subject: [Perl-unix-users] Problem that I am having with split command If I have the following kind of data 500/00-7.1.19.3 I want to split it into separate variables as such $a = "500" $b = "00" $c = "7" $d = "1" $e = "19" $f = "3" Here is what I have so far ($a,$g) = split("/",$projectnumber); ($b,$g) = split(/-/,$pa); ($c,$d,$e,$f) = split(/./,$g); print "$a xx $b xx $c xx $d xx $e xx $f xx $g \n"; the output is: 500 xx 00 xx xx xx xx xx 7.1.19.3 It appears to not be splitting on the . Does anybody have any ideas? _______________________________________________ Perl-Unix-Users mailing list [EMAIL PROTECTED] To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs _______________________________________________ Perl-Unix-Users mailing list [EMAIL PROTECTED] To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs
