[solved] - perl változó változó értéke

Szervusztok!

Először is a tárgyat próbálnám kifejteni, lehet hogy van jobb megfogalmazás rá, röviden nekem most így sikerült, bocs!
Amennyiben javasoltok jobbat cserélem. ;)

Szeretnék egy debug felületet készíteni a perl tákolmányomhoz, ami a globális változókat meg tudná jeleníteni úgy, hogy a nevét ha beírom, megmutatná az értékét.
Gondoltam beolvasom egy readline-al, megcsonkolom egy chomp-al, majd amennyiben van ilyen, akkor vissza adom az értékét.
Az utolsó mozdulat nem megy, pontosabban csak részlegesen,mert pl. az ORS-re, valamint az RS pl. működni látszik.
Miképp lehet ilyet készíteni?
Most itt tartok:

#!/usr/bin/perl

#use	strict;
use	utf8;
use	locale;
use	English;
use	warnings;
$ORS="\n";
my $c=0;
my $test = qq/happy/;
my $line = "";
while(1)
	{
	$c++;
	$line = readline(*STDIN);
	if(defined $line) {
		if($line =~ /^exit$/){exit;}
		chomp $line;

		printf("->%s-<\n",${$line});	#RS, ORS, stb-re működik!
		}
	}

Köszönöm előre is!
Üdv,
vf