On 12-03-08 11:44 AM, sunita.prad...@emc.com wrote:
Sorry , I mean how will I get all those hexadecimal numbers in a array?
my @hex = ();
for my $nbr ( hex( "415A" ) .. hex( "415F" ) ){
push @hex, sprintf '%04X', $nbr;
}
You could also use map:
my @hex = map { sprintf '%04X', $_ } hex( "415A" ) .. hex( "415F" );
See:
perldoc -f hex
perldoc -f sprintf
perldoc -f map
--
Just my 0.00000002 million dollars worth,
Shawn
Programming is as much about organization and communication
as it is about coding.
It's Mutual Aid, not fierce competition, that's the dominate
force of evolution. Of course, anyone who has worked in
open source already knows this.
--
To unsubscribe, e-mail: beginners-unsubscr...@perl.org
For additional commands, e-mail: beginners-h...@perl.org
http://learn.perl.org/
