diff options
| author | in2 <in2@63ad8ddf-47c3-0310-b6dd-a9e9d9715204> | 2002-11-17 13:06:20 +0800 |
|---|---|---|
| committer | in2 <in2@63ad8ddf-47c3-0310-b6dd-a9e9d9715204> | 2002-11-17 13:06:20 +0800 |
| commit | 58ca11c55d6b69290e8141ce16f3863b53b144ad (patch) | |
| tree | 1b617a08348ec626ab833c45753b833f5669634b | |
| parent | eaa868e5c10158c2d8ca7fb623b9f522e495a829 (diff) | |
| download | pttbbs-58ca11c55d6b69290e8141ce16f3863b53b144ad.tar pttbbs-58ca11c55d6b69290e8141ce16f3863b53b144ad.tar.gz pttbbs-58ca11c55d6b69290e8141ce16f3863b53b144ad.tar.bz2 pttbbs-58ca11c55d6b69290e8141ce16f3863b53b144ad.tar.lz pttbbs-58ca11c55d6b69290e8141ce16f3863b53b144ad.tar.xz pttbbs-58ca11c55d6b69290e8141ce16f3863b53b144ad.tar.zst pttbbs-58ca11c55d6b69290e8141ce16f3863b53b144ad.zip | |
some comment in mail body
git-svn-id: http://opensvn.csie.org/pttbbs/pttbbs/trunk/pttbbs@576 63ad8ddf-47c3-0310-b6dd-a9e9d9715204
| -rw-r--r-- | util/waterball.pl | 14 |
1 files changed, 11 insertions, 3 deletions
diff --git a/util/waterball.pl b/util/waterball.pl index 2cfa2a61..05d59999 100644 --- a/util/waterball.pl +++ b/util/waterball.pl @@ -44,13 +44,21 @@ foreach $fndes ( <$JOBSPOOL/water.des.*> ){ #des: userid, mailto, outmode unlink $fndes; } else{ + my $body = + "�˷R���ϥΪ̱z�n:\n\n". + "�w��z�ϥ� Ptt�t�C�����y��z�\�� ^_^\n". + "���y��z�����G�Q���Y�n���[�b���H��\n". + "�z���n���N������Y (�p�� tar+gunzip, winzip ���{��)\n". + "�ѥX�Ӫ��ɮ��¤�r�榡, \n". + "�z�i�H�z�L����¤�r�s��{�� (�p emacs, notepad, word)\n". + "���}���i��s���z\n\n". + "�A���P�±z�ϥΥ��t�ΥH�ι� $hostname ����� ^^\n". + "\n $hostname �����s ". POSIX::ctime(time()); if( MakeMail({tartarget => "$TMP/$userid.waterball.tgz", tarsource => "*", mailto => "$userid <$mailto>", subject => "���y����", - body => - "\n $hostname �����s ". POSIX::ctime(time())} - ) ){ + body => $body}) ){ unlink $fnsrc; unlink $fndes; } |