$Machine = Win32::NodeName() unless( $Machine = shift @ARGV );