Help for this page

Select Code to Download

Select or download this

for (1) {
    my $ref = \ $_;
    $$ref ++;
}