use Net::SMTP; $var1="value1"; $var2="value2"; &sendm($var1,$var2); sub sendm() { my $emailid = $_[0]; my $subject = $_[1]; $smtp->to('$emailid\@address.com'); smtp->datasend("To: $mailid\@address.com\n"); }
In reply to passing $var to smtp subroutine by csarid
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |