RE: Sending Mail
try FormMail http://worldwidemart.com/scripts/formmail.shtml -Original Message- From: Bhanu Prakash [mailto:[EMAIL PROTECTED]] Sent: 20 February 2002 16:59 To: [EMAIL PROTECTED] Subject: Sending Mail Hi, I'm new to Perl and am trying to write some cgi programs in Perl. Currently I'm developing a tool in which , when a user submits a form, the input entered by him should be mailed to the address he specifies in one of teh input fileds.! Does anybody have some sample scripts which does soemthing similar to this? or can anybody give me some bare bone structure of how I should accomplish this? Thanks for the help Bhanu. = Bhanu Prakash G V S __ Do You Yahoo!? Yahoo! Sports - Coverage of the 2002 Olympic Games http://sports.yahoo.com -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED] -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED]
RE: help with html
you're right. it does sound bad. someone call spam cop :-) -Original Message- From: Chris Zampese [mailto:[EMAIL PROTECTED]] Sent: 19 February 2002 11:49 To: perl list Subject: help with html This question probably belongs in the cgi list, but here goes... I know that this is going to sound bad, but I want to send an html document via email to people that have blocked html (I am doing a form for an insurance broker, and it goes to the insurance companies that they deal with. The insurance companies have blocks on html) is there any way around this problem (other than calling each insurance company and getting them to change their settings, this is a problem as some of them are controlled by a 'head office' arrangement). The main thing that I want this for is the ability to set the subject line of a reply, so if anyone knows how to do this another way that would work also, thanks for your time, Chris. -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED]
RE: simple question
what do the below actually do? they look like dutch to me $VisaCard = /^4\d{15}/; $BankCard = /^(6565\d{12})|(555[10]00\d{10})/; -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED]
RE: .dat files
some of them are registry files, like system.dat users.dat(i think) and another one -Original Message- From: Scott Lutz [mailto:[EMAIL PROTECTED]] Sent: 07 February 2002 07:28 To: Beginners Perl Subject: .dat files Does anyone have any ideas or suggestions to actually reading/modifying/making the infamous .dat files that are spread all over the Win32 file system? I would like to see what is in them, and maybe edit if I choose, and wonder if there is a module out there for doing this? Anyone? (and thanks in advance) -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED] -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED]
join
hi. i keep getting wierd errors when i try to split a string. the string is split(/?/,$testdata); the error i get is /?/: ?+* follows nothing in regexp what does it mean Thanks -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED]
RE: undefined variable
cool. thats how i do it :-) you don't think i actually write any code do you ;-) -Original Message- From: Debbie McNerney [mailto:[EMAIL PROTECTED]] Sent: 30 January 2002 18:14 To: Beginners perl Subject: undefined variable Please accept my apologies for being so dumb. I am a beginner and really have done basic perl scripting by using the "copy and paste and modify" method of script writing. I have a server running Solaris 8. From what I can determine, perl is version 4 on it (perl -v). Server came preinstalled with proprietary software for managing ads in our production dept. I have a newly created directory that contains links to what will soon be thousands of files. The number of links in this directory will grow daily. I am trying to write a simple perl script that can be automatically run by a cron that will delete these links after 3 days. I "borrowed" a script that runs successfully on a Linux server here and does exactly the same thing. Could someone look at this script and tell me where to begin debugging it. when i run it in a command window, i get a server error "dir_prefix is not defined". -- #!/usr/bin/perl $dir_prefix="/directoryoffroot/debbietest"; opendir(fotodir,$dir_prefix); @directory=grep(!/^\./, readdir(fotodir)); open(rep_fil,">/fotorep.txt"); print rep_fil " The following files deleted because they were 1 days old...\n\n"; foreach $dir_entry (@directory) { $file_name=$dir_prefix."/".$dir_entry; $file_days=(-M $file_name); if ($file_days>1) { system("rm -f -r \"$file_name\""); print rep_fil "$file_name\n"; } } print rep_fil "\n***END OF REPORT***"; close(rep_fil); $sj="-s \"Kill the links\""; system("mail $sj root\@whatever.com < /fotorep.txt"); -- Debbie McNerney, Systems Dept. The News-Journal Corp.® 901 6th Street Daytona Beach, Florida 32117 386-252-1511 ext. 2314 [EMAIL PROTECTED] -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED] -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED]
RE: decimal point
did i say 10? i meant 100 -Original Message- From: Darren Simpson Sent: 28 January 2002 08:48 To: 'Stuart Clark'; Perl List Subject: RE: decimal point i would try dividing the number by 10 -Original Message- From: Stuart Clark [mailto:[EMAIL PROTECTED]] Sent: 28 January 2002 01:57 To: Perl List Subject: decimal point Hi, I am trying to move the decimal point 2 places to the the left. Eg : To make 4536233 into 45362.33 I tried this $total = "4536233"; $total = sprintf("%0.2f",$total); print "$total"; But I get this 4536233.00 Can anyone help please Regards Stuart Clark -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED]
RE: decimal point
i would try dividing the number by 10 -Original Message- From: Stuart Clark [mailto:[EMAIL PROTECTED]] Sent: 28 January 2002 01:57 To: Perl List Subject: decimal point Hi, I am trying to move the decimal point 2 places to the the left. Eg : To make 4536233 into 45362.33 I tried this $total = "4536233"; $total = sprintf("%0.2f",$total); print "$total"; But I get this 4536233.00 Can anyone help please Regards Stuart Clark -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED]
whois
Hello all. I don't know if this is the right list to post to but i am a beginner in perl. we have a bsd unix distribution with perl 5. I am wondering if anyone knows of a decent whois function written in perl. Thank you in advance -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED]