Help for this page

Select Code to Download

Select or download this

use Lexical::Alias qw(alias_r);
my ($s, %h);
...
---
$s:SCALAR(0x1acefd4)
$h{key}:SCALAR(0x1acefd4)