with bbentry do
               begin
                   name     := "Olivia Paarts";
                   stdcode  := "3214";
                   phnum    := "30001234";
                   yrlevel  := 9;
               end

##</code><code>##

with $anonhash do {
        $name = 'dave';
        $city = 'San Francisco';
        $phone = '555-1212';
        $hobbies = qw( Perl Anime);
        }