my( $username, $user ) = @ARGV;