#!perl
#
# ModoEvalEcho.pl
#  Robin Scher, Uberware LLC
#  Copyright Uberware, LLC. All Rights Reserved.
#
# Echos the input to lxout and also evaluates it with lx

my $script_command;
foreach (@ARGV) {
	$script_command .= /\s/ ? " \"" . $_ . "\""
					:         " "   . $_;
}

print $script_command . "\n";
