#!/usr/bin/perl
if (-f "/usr/local/bin/perl") {
        if (! -l "/usr/local/bin/perl") {
		system("mv /usr/bin/perl /usr/bin/perl.old");
		system("ln -s /usr/local/bin/perl /usr/bin/perl");
	}
}