Help for this page

Select Code to Download


  1. or download this
    use strict ;
        use DB_File ;
    ...
        @list = $x->get_dup("Dog") ;
        print "Dog =>       [@list]\n" ;
    
  2. or download this
    
    
        $count = $x->get_dup($key) ;
        @list  = $x->get_dup($key) ;
        %list  = $x->get_dup($key, 1) ;