> henry wrote: > #!/usr/bin/perl -w > $record ="Pacific:ocean" > my($a,$b)=split(/:/,$record); > print "$a\n"; > print "$b\n"; > > My problem is : > In practical use , I usually get > $record = " a : b" ; > > How do I take out those blanks ?
$record =~ s/\s+//g; HTH HAND -rickw -- _____________________________________________ Rick Welykochy || Praxis Services Pty Limited "Yes means No and No means Yes. Delete all files [Y]? " -- SLUG - Sydney Linux User Group Mailing List - http://slug.org.au/ More Info: http://lists.slug.org.au/listinfo/slug
