Tek-Tips is the largest IT community on the Internet today!
Members share and learn making Tek-Tips Forums the best source of peer-reviewed technical information on the Internet!
-
Congratulations derfloh on being selected by the Tek-Tips community for having the most helpful posts in the forums last week. Way to Go!
-
open a file from a directory
That worked thanks very much for your help cnw40007 -
open a file from a directory
Hi, I was wondering could anybody show me how i would open a number of files from a directory.Each file begins with qfh and then a series of different numbers and letters. My code below prints out the specified files but i need to open them to search for a certain word. Can you help me please... -
save a mysql database
great that worked, how do i save it onto another linux machine? -
save a mysql database
hi is it possible to save a mysql database onto a floopy to use on another computer?If so how would i go about it?Thanks cnw40007 -
insert into database
I have two fields named email and subject and i want to update the email field. $myvar holds the email address so would i use INSERT INTO addsubj VALUES ('$myvar'); -
remove from an array to a temp file
Ok this is my problem. I have a file which contains email header info.I have written code below to parse through it for the To: line off a spreadsheet of usernames.Once i get a match what i would like to do is move that particular header to another file.At the moment it just rewrites the entire... -
insert into database
I have modified my code $action is set to the email address and it is then set back to 'No' to start the loop again, if(/^Subject:/ && $action eq 'Yes') { $myvar = $_; $myvar =~ s/: /: !SPAM!/g; print $myvar; $action = 'No'; } if(/^From:\s([0-9a-zA-Z\.\-\_]{13,})+\@[0-9a-zA-Z\.\-]+$/) {... -
email regular expression
Hi below are 2 regexps that i have tried. Either are supposed to print out any email that has a number in the higher domain.There not giving me any errors but there not working either can anybody show me an easier way please. -- ([0-9a-zA-Z\.\-\_])+\@[0-9a-zA-Z\.\-]\.[\w]{4,5}[0-9]{1,})$/ ) --... -
delete from database
OK great i tried that and it worked.Thanks again for your help. cnw40007 -
insert into database
Hi my code below checks an email address of stored email address in a mysql database and if it isn't in the db insert it. The problem is it is inserting it but when i view the databse there is just a blank line but yet the row number has gone up. if( /^From... -
delete from database
Hi I have a mysql database with various email addresses.There are a number of blank rows that i want to get rid of. Ive tried delete from addsubj values ('',''); but nothing happens. Can anybody help me please. Thanks cnw40007 -
simple question
I tried both examples.with the first one i don't know where the end of the paragraph will be, so i couldn't get the program to run and the second example i ran it but it didn't do anything.Basically the way my program works is it matchs for a certain email address and if it is found it will... -
simple question
Hello, How would i go about matching a word from a file and taking out the word and everything below it until it reaches a blank line and put it into another file in perl??? -
-
insert into database
Hi I'm trying to enter values into a mysql databse from my webserver.My problem is that from the web server i can enter a value into the database, it tells you the value has been entered but when i check the databse it is not there. This is my code #!/usr/bin/perl use CGI qw(:standard); use... -
comparing strings with spreadsheet
Hi i have a spreadsheet with id numbers e.g acm1001 acm1002 .... acm4040. I also have a text file with various different id's aswell. How can i compare the two and if there is a match print it out.Im using the spreadsheet-parseexcel module but the examples that come with it are hard to... -
simple question
grand that worked.Do you have any idea on how i would compare this off a spreadsheet. Eg my spreadsheet looks like this cnw40001 cnw40002 .... cnw40020. If there is a match with the username of the email then print match!I have installed the spreadsheet modules but im not sure how to use it.Im... -
simple question
Hi is there a way of getting the username of an email address and print it out instead of printing the full email address using perl.This is my code but it prints out the full email address ... while(<HEADER>) { if(/To:([^\@]+)/) { print OUTPUT;} } -
-
Need help with code
Ok thanks a mill, that cleared it up some what!im fairly new to perl so would you be able to give me some sample code??
