Select Code to Download

$ref = eval "\\\$$name";

#! perl -w
use strict;
...
        $ref = eval "\\\$$name"; print "\$$name = '$$ref'\n";
    }
}

$x = 'global'
$x = 'lexical'
$x = 'nested lexical'