use strict;
use warnings;

use Email::Send::SMTP::Gmail;

my $mail=Email::Send::SMTP::Gmail->new( -smtp=>'smtp.gmail.com',
					-layer=>'ssl',
                                        -port=>465,
					-verbose => '1'
					-login=>'mylogin'
					-pass=>'mypassword');

$mail->send(-to=>'toaddress',
	    -subject=>'Hello!',
	    -verbose=>'1',
	    -body=>'Just testing it',
	    -attachments=>'');

$mail->bye;

##</code><code>##

Argument "login" isn't numeric in subtraction (-) at Mail.pl line 6.
Argument "pass" isn't numeric in subtraction (-) at Mail.pl line 6.
Argument "ramya.a@jouve.in" isn't numeric in subtraction (-) at Mail.pl line 6.
auth(username, password) at C:/Perl/site/lib/Net/SMTPS.pm line 165.