Help for this page
#!/usr/bin/perl ... my $loop="2,4..5"; splice @$arr,$_,0,999 foreach map { /\.\./ ? $` .. $' : $_ } split /,/ +, $loop; use Data::Dump 'dd'; dd $arr;
[1, 2, 999, 3, 999, 999, 4 .. 7]
www.com | www.net | www.org
No recent polls found