Statistics
| Revision:

root / trunk / code / projects / traffic_navigation / update_linefollow.pl @ 1929

History | View | Annotate | Download (268 Bytes)

1
#!/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

    
15