Help for this page

Select Code to Download


  1. or download this
    get_conf(%cur_conf);
    
  2. or download this
    sub mypush (\@@) {
        my $aref = shift;
    ...
    @a = (1);
    mypush @a, 2, 3, 4;
    print "@a\n";