First import
git-svn-id: http://photonzero.com/dotfiles/trunk@1 23f722f6-122a-0410-8cef-c75bd312dd78
This commit is contained in:
commit
83d40113d2
60 changed files with 4264 additions and 0 deletions
21
bin/mailheaders
Executable file
21
bin/mailheaders
Executable file
|
|
@ -0,0 +1,21 @@
|
|||
#!/usr/bin/perl
|
||||
if ($#ARGV == 0) {
|
||||
$ARGV[1] = "michener\@csua.berkeley.edu";
|
||||
}
|
||||
print <<FOO;
|
||||
EHLO localhost
|
||||
MAIL FROM: rootcow\@csua.berkeley.edu
|
||||
RCPT TO: $ARGV[1]
|
||||
DATA
|
||||
From: RootCow\@csua.BERKELEY.edu
|
||||
To: $ARGV[1]
|
||||
Subject: $ARGV[0]
|
||||
|
||||
FOO
|
||||
while (<STDIN>) {
|
||||
print;
|
||||
}
|
||||
print ".";
|
||||
print "\n";
|
||||
print "QUIT";
|
||||
print "\n";
|
||||
Loading…
Add table
Add a link
Reference in a new issue