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

##</code><code>##

GRANT SELECT ON network.devices TO script@192.168.0.5;
FLUSH PRIVILEGES;