Help for this page

Select Code to Download


  1. or download this
    $bits{'one'}=@test;
    
  2. or download this
    my @test = ( qw / bing bong bang / );
    print '['.$test[2].'] ['.$test[1].'] ['.$test[0]."]\n";
    ...
    [bang] [bong] [bing]
    [bang] [bong] [bing]