Select Code to Download

 with bbentry do
               begin
...
                   phnum    := "30001234";
                   yrlevel  := 9;
               end

with $anonhash do {
        $name = 'dave';
...
        $hobbies = qw( Perl Anime);
        }