Help for this page

Select Code to Download


  1. or download this
        if ( scalar(@errors) gt 0 ) {
    
        } elsif ( scalar(@errors) eq 0 ) {
    
  2. or download this
        if ( @errors > 0 ) {
    
        } elsif ( @errors == 0 ) {
    
  3. or download this
    open (CFG, "<", "$config") or die "Can't open config ($config) file: $
    +!";
    
    ...
                                copy ("$filename","$file2") or die "Copy f
    +ailed: $!";
    
                    copy ("$filename","$file2") or die "Copy failed: $!";