A simple way:

#!/usr/bin/perl -w
open FILE, ">>file.txt";
print FILE "line1\n";
print FILE "line2\n";
print FILE "ENTHDR|1|3.0\n";
print FILE "STAGEHDR|Barcoded\n";
close FILE;


On Thu, Jan 20, 2011 at 3:57 PM, steve1040 <[email protected]> wrote:

> I need to add 2 lines to a file and add the following text.
>
> ENTHDR|1|3.0
> STAGEHDR|Barcoded
>
> I don't have any idea how to do this in Perl
>
> Thanks
> Steve
>
>
> --
> To unsubscribe, e-mail: [email protected]
> For additional commands, e-mail: [email protected]
> http://learn.perl.org/
>
>
>

Reply via email to