file question

[Chris Zampese]

Hi everyone,
     I thought that the folowing code should save the data to the file, and then when 
it was run again it should save the new data on a newline in the same file.  It saved 
the data once, but it will not repeat the feat.  The data comes from a form, and I use 
it to generate an email (which works)
I expected the file to look like this...
    Placing_Slip_123_456_SOMECOMPANY+09-02-2002
    Placing_Slip_890_777_SOMEOTHERCOMPANY+09-02-2002
 etc, but I only get the first line.

#!C:\Perl\bin\perl.exe -w
#By Chris Zampese   
#use strict;
use CGI ':standard';
use Net::SMTP;
use LWP::Simple;

# some code here that gets stuff from form and creates an email using NET::SMTP

open(MYFILE, "+>> C:/sentslips/sentslips.txt")
       || die "can't open C:/sentslips/sentslips.txt";

print {MYFILE} "Placing_Slip_";
print {MYFILE} $clientno;
print {MYFILE} "_";
print {MYFILE} $policyno;
print {MYFILE} "_";
print {MYFILE} $underwriter;
print {MYFILE} "+";
print {MYFILE} $dates;
print {MYFILE} "\n";

close (MYFILE);

Thanks once again,
                   Chris.