root / trunk / code / projects / traffic_navigation / update_linefollow.pl @ 1928
History | View | Annotate | Download (274 Bytes)
1 | 1928 | josephle | #!/usr/bin/perl -W |
---|---|---|---|
2 | |||
3 | my $line; |
||
4 | |||
5 | $line = `pwd`; |
||
6 | if($line =~ /linefollowing/igs) { |
||
7 | print "Cannot modify linefollow code from linefollow\n"; |
||
8 | } #else { |
||
9 | # `rm lineFollow.*`; |
||
10 | # `rm lineFollow.*`; |
||
11 | # `cp ../linefollowing/lineFollow.* .`; |
||
12 | # `cp ../linefollowing/lineDrive.* .`; |
||
13 | #} |
||
14 |