Colony

#!/usr/bin/perl -W

my $line;

$line = `pwd`;

if($line =~ /linefollowing/igs) {

	print "Cannot modify linefollow code from linefollow\n";

} #else {

#	`rm lineFollow.*`;

#	`rm lineFollow.*`;

#	`cp ../linefollowing/lineFollow.* .`;

#	`cp ../linefollowing/lineDrive.* .`;

#}