in reply to split string using optimized code or perl one liner
Two fewer lines:
use strict; use warnings; my $string = 'www.perlmonks.org.split.reduce.code.check'; my @array = reverse split /\./, $string; print "Reversed data ==> @array\n";
|
---|
In Section
Seekers of Perl Wisdom