Help for this page

Select Code to Download


  1. or download this
    `cd; pwd > tmp; cp tmp figs/Com/dis/tmp`;
                my $con = `cat tmp`;
    ...
                 open(RESULT,'>> /$1/$2/figs/Com/dis/result.xml' or die "c
    +ouldn't open: $!");
                }
                select(RESULT);
    
  2. or download this
    Useless use of a constant in void context at ./test.pl line 47.
    Can't use string (">> /$1/$2/figs/Com/dis") as a symbol ref while "str
    +ict refs" in use at ./test.pl line 47.