Lines Matching refs:from
6 # specifying the "from" directory.
10 # For each of these files, we create in the "from" directory a link
15 # Apart from this, this script should be able to handle even the most
20 my $from = shift;
23 my @from_path = split(/[\\\/]/, $from);
33 # In this loop, @to_path always is a relative path from
36 # At the end, @from_path (as a relative path from the original pwd)
38 # which means that @to_path then is a path from there to the original pwd.
58 unlink "$from/$file";
59 symlink("$to/$file", "$from/$file") or $err = " [$!]";
61 unlink "$from/$file";
63 open (NEW, ">$from/$file") or die "Can't open $from/$file: $!";
70 close (NEW) or die "Can't close $from/$file: $!";
72 print $file . " => $from/$file$err\n";