|
|
| Network Programming with Perl (ISBN: 0201615711) |
|
List Price: $44.95
Our Price: $44.95
Used Price: $22.49
Release Date: 27 December, 2000
Manufacturer: Addison-Wesley Pub Co (Paperback)
Sales Rank: 63,530
Author: Lincoln D. Stein
|
More Info
|
|
|
Sendmail Inject
|
2003-01-26 22:31:29
|
| |
perl
|
|
|
|
|
Category: source:perl:internet
|
|
Description: Open a pipe to sendmail to send an email.
|
|
Platform: unix
|
|
Author: detour
|
|
Viewed: 2249
|
|
Rating: 3/5 (4 votes)
|
|
|
| If you have any questions about
this piece of code or still need help, try posting your question on the forum. |
#!/usr/bin/perl
#
# sm-inject.pl written by detour@metalshell.com
#
# Open a pipe to sendmail to send an email.
#
# http://www.metalshell.com/
#
use strict;
my $sendmail = "/usr/sbin/sendmail";
open (SENDMAIL, "| $sendmail -t");
print SENDMAIL "Subject: Sendmail Inject\n";
print SENDMAIL "From: me\@email.com\n";
print SENDMAIL "To: dev\@null.com\n";
print SENDMAIL "Hello!\n";
print SENDMAIL "\n\n\n-bye";
close(SENDMAIL);
|
|
|
