my $USERNAME = $OPTS{'u'} || "username"; my $PASSWORD = $OPTS{'p'} || "password";