Re: List Values As Multidimensional Hash Keys

Something like this?:

use strict;
use warnings;

my $a = 'a1:a2:a3=foo';

my ($key, $val) = split /=/, $a, 2;

$key =~ s/:/}{/g;

my %hash;

eval "\$hash{$key}=\"$val\"";
[download]

-QM
--
Quantum Mechanics: The dreams stuff is made of

Comment on Re: List Values As Multidimensional Hash Keys Download Code

Replies are listed 'Best First'.
Re: Re: List Values As Multidimensional Hash Keys by tachyon (Chancellor) on Mar 15, 2004 at 00:30 UTC
Leving aside the fact that this does not compile under strict as you don't declare %hash, this is a security hole just waiting for a cracker.The string form of eval is dangerous, don't use it until after you understand why. Here is a hint.... `use strict; use warnings; my %hash; my $a = '1};print "You have just been cracked!\n";#a1:a2:a3=foo'; my ($key, $val) = split /=/, $a, 2; $key =~ s/:/}{/g; eval "\$hash{$key}=\"$val\""; __END__ You have just been cracked!` [download] The print could be any arbitrary code. unlink, rm, shutdown....any code, running with the perms of whoever started the script. cheers tachyon	[reply] [d/l]
•Re: Re: List Values As Multidimensional Hash Keys by merlyn (Sage) on Mar 14, 2004 at 23:44 UTC
Your post has been downvoted. Please don't offer this solution again. -- Randal L. Schwartz, Perl hacker Be sure to read my standard disclaimer if this is a reply.	[reply]
Re^3: List Values As Multidimensional Hash Keys by Anonymous Monk on Mar 15, 2004 at 05:55 UTC
Your post has been downvoted. Please don't malform internal links again (you see, manually editing the URI is just sooooo incredibly difficult). Of course I am entirely kidding.	[reply]