OpenCores
URL https://opencores.org/ocsvn/an-fpga-implementation-of-low-latency-noc-based-mpsoc/an-fpga-implementation-of-low-latency-noc-based-mpsoc/trunk

Subversion Repositories an-fpga-implementation-of-low-latency-noc-based-mpsoc

[/] [an-fpga-implementation-of-low-latency-noc-based-mpsoc/] [trunk/] [mpsoc/] [perl_gui/] [lib/] [perl/] [widget.pl] - Diff between revs 41 and 42

Go to most recent revision | Show entire file | Details | Blame | View Log

Rev 41 Rev 42
Line 1016... Line 1016...
                }
                }
        }
        }
 
 
}
}
 
 
 
 
 
sub remove_file_and_folders{
 
        my ($file_ref,$project_dir)=@_;
 
 
 
        foreach my $f(@{$file_ref}){
 
                my $name= basename($f);
 
                my $n="$project_dir$f";
 
                if (-f "$n") { #copy file
 
                        unlink ("$n");
 
                }elsif(-f "$f" ){
 
                        unlink ("$f");
 
                }elsif (-d "$n") {#copy folder
 
                        rmtree ("$n");
 
                }elsif(-d "$f" ){
 
                        rmtree ("$f");
 
                }
 
        }
 
 
 
}
 
 
sub read_file_cntent {
sub read_file_cntent {
        my ($f,$project_dir)=@_;
        my ($f,$project_dir)=@_;
        my $n="$project_dir$f";
        my $n="$project_dir$f";
        my $str;
        my $str;
        if (-f "$n") {
        if (-f "$n") {

powered by: WebSVN 2.1.0

© copyright 1999-2024 OpenCores.org, equivalent to Oliscience, all rights reserved. OpenCores®, registered trademark.