sub ParseArguments { # Parses any perl commands with * delimeters, eg:  '*$ENV{CONFIG_DIR}*/contents'  --> 'MY/CONFIG/DIR/contents'
	my $Line = pop @_;
	my @Args = split /\*/, $Line;
	foreach my $Arg (@Args) {
		if ($Arg ne "") {
			if ($Arg =~ /^[\@\$\%]/) {
				my $Temp;
				$Arg = "\$Arg = $Arg";
				eval $Arg;
				$Arg =~ s/^\$Arg = //;
			}
		}
	}
	my $Return = "";
	foreach my $Arg (@Args) {
		$Return = $Return . $Arg;
	}
	return $Return;
}

##</code><code>##

*$ENV{COMPANY}*/Custom_Perl/Logs
*$Config->{PerlDir}*/Lib/Chris/Pantheon/Border.CoOrds