Solved

Hung up on the Header

Posted on 2004-10-14
2
193 Views
Last Modified: 2008-03-10
I don't even know if this will work this way (the FTP parts work OK), from the web. But I can't get past a 'Valid Header' message and I can't figure out why. I've messed at it for well over an hour.

Any help?

Thanks

############################
#!/usr/local/bin/perl
use CGI qw(:standard :shortcuts);

print "Content-type: text/html\n\n";
print "<head><title>Approve Page</title></head>\n";  
print "<html>\n";          
print "<body bgcolor=\"#FFFFFF\">\n";  
print "FTPing \n";  
#############

ftp -i <<**
open 19.59.28.51
cd 'pa.test.poffacng'
lcd /export/ford/eccws7/u/mso/www.86.80/fcsd/psl/namer/ftp
ascii
mget  *
bye
**

**
ftp -i <<**
open 19.91.168.247
cd w:/ftp/webtrans/downloads
lcd /export/ford/eccws7/u/mso/www.86.80/fcsd/psl/namer/ftp
ascii
mput  *.TXT *.txt
bye
**
##############
print "</body></html>\n";  
0
Comment
Question by:tmccar10
2 Comments
 
LVL 48

Accepted Solution

by:
Tintin earned 50 total points
ID: 12312302
You can't just plonk random ftp commands in a Perl script, as you probably know by the errors you get, ie:

Unquoted string "ftp" may clash with future reserved word at script.pl line 10.
Ambiguous use of -i resolved as -&i() at script.pl line 10.
Use of bare << to mean <<"" is deprecated at script.pl line 10.
Semicolon seems to be missing at script.pl line 19.
Unquoted string "ftp" may clash with future reserved word at script.pl line 20.
Ambiguous use of -i resolved as -&i() at script.pl line 20.
Use of bare << to mean <<"" is deprecated at script.pl line 20.
syntax error at script.pl line 20, near "ftp "
Can't find string terminator "" anywhere before EOF at script.pl line 20.


To call FTP from a Perl script, either call a shell script with your ftp commands or use the Net::FTP module.
0
 

Author Comment

by:tmccar10
ID: 12312934
Thanks, as usual, Tintin-

Got plenty to think about.

I'm a learn-as-I go guy with perl. More go then learn, most times. I really didn't (don't) know what's possible and what's not because my knowledge is so spotty.  This'll be a help onseveral levels.

Got myself a hobby for a while.

Thanks again
0

Featured Post

What Is Threat Intelligence?

Threat intelligence is often discussed, but rarely understood. Starting with a precise definition, along with clear business goals, is essential.

Join & Write a Comment

I've just discovered very important differences between Windows an Unix formats in Perl,at least 5.xx.. MOST IMPORTANT: Use Unix file format while saving Your script. otherwise it will have ^M s or smth likely weird in the EOL, Then DO NOT use m…
Checking the Alert Log in AWS RDS Oracle can be a pain through their user interface.  I made a script to download the Alert Log, look for errors, and email me the trace files.  In this article I'll describe what I did and share my script.
Explain concepts important to validation of email addresses with regular expressions. Applies to most languages/tools that uses regular expressions. Consider email address RFCs: Look at HTML5 form input element (with type=email) regex pattern: T…
This video gives you a great overview about bandwidth monitoring with SNMP and WMI with our network monitoring solution PRTG Network Monitor (https://www.paessler.com/prtg). If you're looking for how to monitor bandwidth using netflow or packet s…

708 members asked questions and received personalized solutions in the past 7 days.

Join the community of 500,000 technology professionals and ask your questions.

Join & Ask a Question

Need Help in Real-Time?

Connect with top rated Experts

13 Experts available now in Live!

Get 1:1 Help Now