On Thu, Apr 30, 2009 at 16:03, Dave Thacker <dthack...@gmail.com> wrote:
snip
> print LOG "The log starts here\n";
snip

one line


snip
>    print "Contacting $host\n";
snip

a second line

snip
>    my $ftp=Net::FTP->new($host,Debug=>0, Timeout=>360) or print LOG "Can't
> connect to $host";
snip

oops, no newline

snip
>    $ftp->cwd("/tmp") or print LOG "Can't change to /tmp";
snip

oops, no newline

snip
>    $ftp->mkdir("test-send") or print LOG "Can't make test-send";
snip

oops, no newline

snip
>    $ftp->cwd("/usr/meh/test-send") or print LOG "Can't change to test-send
> directory.";
snip

oops, no newline

snip
>    print LOG "Finished Transmission at $host\n";
snip

Finally a newline.

-- 
Chas. Owens
wonkden.net
The most important skill a programmer can have is the ability to read.

--
To unsubscribe, e-mail: beginners-unsubscr...@perl.org
For additional commands, e-mail: beginners-h...@perl.org
http://learn.perl.org/


Reply via email to