in reply to Split int into segments of max int 26
Hi,
The spreadsheet modules have code to do this for you
use Data::Dump qw/ dd /; use Spreadsheet::Read qw( cr2cell ); for my $pair ( [0,0], [1,1], [12,12], [25,25], [26,26], [66,66], [666,666], [6666,6666], ) { dd( cr2cell( @$pair ) , @$pair ); } __END__ ("", 0, 0) ("A1", 1, 1) ("L12", 12, 12) ("Y25", 25, 25) ("Z26", 26, 26) ("BN66", 66, 66) ("YP666", 666, 666) ("IVJ6666", 6666, 6666)
In Section
Seekers of Perl Wisdom