I was just reading an excellent article by Dominus on why you shouldn't do that. Since you only have two variables, it's not going to hurt you to flatten that loop:

$graphic1 = $pers_dcr_files{ $key[1] }{GraphicName};
$graphic2 = $pers_dcr_files{ $key[2] }{GraphicName};
[download]

Probably run faster and be easier to maintain that way, too. If you need more variables, use a hash:

for $i (1..10) {
  $graphic{$i} = $pers_dcr_files{ $key[$i] }{GraphicName};
}
[download]

You have to reference it as $graphic{1} instead of $graphic1, but that doesn't seem like a real big problem.