use strict; use warnings; my $s = ' Aggregate: f3050-184-160:EmptyAggr'; my ($first, $rest) = split /:/, $s, 2; print "$first\n"; print "$rest\n"; __END__ Aggregate f3050-184-160:EmptyAggr
In reply to Re: Splitting on a pattern once
by toolic
in thread Splitting on a pattern once
by perlpal
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |