2,452 Topics
 | |
| | Hi Perl Guru's I have a requirement where i need to find out two patterns and second pattern is dependent on first pattern (i.e., if file1 have pattern1 the serach pattern2 in file1). Let me explain in detail. Forexample: I have last three days job logs (Infact logs folder have … |
| | i am writing a login script in a perl and i set a cookie. here it is: [CODE] if ($V::testsubmit eq 'yes') { ($userid)=$dbh->selectrow_array("SELECT id from logins WHERE username='$V::username' and password='$V::password'"); } if ($userid > 0){ @alphanumeric = ('a'..'z', 'A'..'Z', 0..9); $sessionid = join '', map $alphanumeric[rand @alphanumeric], 0..50; print<<"EOF"; …  |
| | Hi, I am attempting to read in a CSV file, modify certain arrays and output it into a new file. It works fine on a mac, however on Windows it does not do anything. Any ideas what im doing wrong? Code posted below; [CODE] open(FILE,"file.csv") or die $!; open(TARGET,"> newfile.csv") … |
| | Hi, I have start and end time like this: [CODE] $start = "Wed Apr 27 03:57:21 EDT 2011" $end = "Wed Apr 27 03:58:42 EDT 2011" [/CODE] I need to compute the exact time taken some thing like 2 hours or 1 min. I have to do this with out … |
| | hello all, i am getting the following error when i am trying to run my 1st Perl script: [CODE][id=0 @ 0] : IP address "3.3.3.3" corresponds to device "core". Thread 1 terminated abnormally: Not a CODE reference at ./dev_ithread.pl line 23. [id=0 @ 1] : IP address "5.5.5.5" corresponds to … |
| | Hi, I want to download multiple files from the server/web to the folder I choose before (I already know the exactly link and know parser), but I don't know how to "download a file" with Perl. So, anyone helps me how to download file with Perl (give me detail about … |
| | Hi All, I'm having a bit of a problem with a service I'm developing. I have a CGI script sitting on my server (Ubuntu 10.0.4) which obviously receives it's requests on port 80, and the incoming requests arrive on port 8083 which is out of my control. So I have … |
| | Hi Perl Masters, I have a requirements where i need to execute the particular part of code in weekdays (from Moday to Friday & Saturday) and some part on (Sunday)but i don't know that how to check the current day in perl. Like if current day is in between monday … |
| | Hi Perl Gurus, I have a text which look like 20 Dec 2010 | Completed | ABC 20 Dec 2010 | Completed | DEF 20 Dec 2010 | Completed | GHI 19 Dec 2010 | Completed | JKL You can see that the file have three columns first column is … |
 | Formula field on crystal report of asp.net as hyperlink |
| | hello guys! I am looking for a large upload script. A script that can carry files like a movie on 1GB up to my server. # i got the host and the required settings. But i need a script with progress bar etc. I am willing to pay for it. … |
| | Hi, I am using xml:: DOM and Lib xml parsers. The performance of these parsers in how ever slow some times. The data i have is very huge textual data. Is caching mechanism for these parsers are available? what is the best way to speed up these parsers? Any suggestions? … |
| | Hello, I'm beginner... I can't solve this. id name address 1 cristine New York 2 murray Redmond 3 kumar Sunnyvale This is 'samples.xlsx' file-Excel type. 'id' string in A1, 'name' in B1, 'address' in C1 column in excel file. Create a Perl script to store the information about student using …  |
 | |
 | Hi All, I am developing a perl script using the LWP library to extract all the links from a website. I only am planning to extract the internal links of a website. Now there is a URI class which has a hostname instance variable, which will always extract the domain … |
| | How can I turn on debug for fucntion sendSMTP ?? What is the function for var $debug ??? [CODE] #!/usr/bin/perl -w use Socket; use strict; my($mailTo) = 'chuikingman@yahoo.com.hk'; my($mailServer) = 'mail.hgcbroadband.com'; my($mailFrom) = 'medined@mtolive.com'; my($realName) = "chuikingman"; my($subject) = 'Test send_mail'; my($body) = "Test Line One.\nTest Line Two.\n"; $main::SIG{'INT'} = …  |
| | hi all, i have created a crosstab query and one of the row heading contains a hyperlink field. my problem is that the field is not working, and on top of that it gives corrupted values too. pls help thanks |
| | y/A-Za-z/N-ZA-Mn-za-m/; it is a rot13 script but I don't undestand how it works, what is the y// operator for |
| | me and my team working on a project called Stealth Hunter, Summarize about our project: Stealth Hunter is a thief catcher, It will silently take a snapshot of user using a stolen notebook or pc with webcam and send the information via email. how it work is: The scripts will … |
| | |
| | hi! i am totally new in perl and i have a problem..i have a search maschine and after every query i call a perl script to do the jod and see the results. i want every time i run the perlscrit to be able to see a progress bar in …  |
| | Hello, I'm trying to place select hyperlink, or button to get item details on another page. In DataGrid control it is very easy to do it, I have just add HyperLinkField, and add Url parameter details.aspx?id={0}. I have tried with below code, but of course it is not working, as … |
| | Hi, I have been trying to get a select menu to work for hours, and everything is working fine but for one little bit, everytime I select from the jump menu and load the same page again, the menu displays the first result that comes from the database instead of … |
| | i know this is not a new question..but i try follow the solution working out from other post...but there are nothing to print out on my text area...if i directly print a sentence on my text file..it's work..why? #!/usr/local/bin/perl use Tk; use File::Tail; #Main Window my $mw = new MainWindow; … |
| | Hello I need help with perl script I'm writing. we have an input file that contains following: [CODE]variable=value; variable2=value2; . . .[/CODE] However sometimes following thing happens - one of the variable might have its value written in more lines: [CODE]variable=value; variable=value value value value value value ; variable2=value2; . … |
| | Hi All, I'm using SOAP::Lite to do some online payments. The whole mechanism is set on separate machine which is communicating with payment gateway. So WWW machine sends a message to invoke SOAP::Lite and SOAP message is sent to payment gateway. In development I had both "machines" running on one … |
| | i have this list, about some company payment , in the list, some company pays two times in a particular day. i need to write a perl program to add up the company's total payment for that particular day such as eid date amount 00101 2009-12-21 3009 00101 2009-12-21 165 … |
| | Hi, I have two files: File1 (tab-delimited and two columns): Ex_efxb 0.0023 MSeef 2.3000 F_ecjc 0.3338 MWEEI -0.111 DDAIij 17.777 File2: MSeef 2.3000 F_ecjc 0.3338 I want to search the content of File one using the content of File 2 and then display the output as follows: Date of search: … |
| | I would like to match a pattern from the following data set and print the line containing that pattern plus the immediate next line. Say I am interested in matching the pattern- [B]FrNum: 1[/B]. If my program runs correctly for the following data set, the output should be : [I]GOP: … |
| | Hi, 65 (1 of 6) 66 (2 of 6) 67 (3 of 6) 68 (4 of 6) 69 (5 of 6) 70 (6 of 6) This my pdf file pages. I have get the total pages and total blank pages. I can't get the logical page number. 65, 66, 67, … |
| | Hi all, I am having issues with the sendfile command in mod_per2. I am getting the following errors in the error_log: [Thu Mar 24 11:38:50 2011] [info] [client 10.199.122.122] (32)Broken pipe: core_output_filter: writing data to the network [Thu Mar 24 11:38:50 2011] [error] [client 10.199.122.122] Apache2::RequestIO::sendfile: (130) Software caused connection … |
| | Hi Guys I am trying to read contents of directory... using "FindNextFile(hFind, &FindFileData)" Findfirstfile returned me then first file in the directory.. even though I have somany files in the directory (FindNextFile(hFind, &FindFileData) returning me zero..... can anyone help me... thanks in advance... Thanks  |
 | I am relatively new to perl, and I'm having a problem with loops. I'm trying to get a program for a simple number guessing game to repeat itself until you get the right number. Here is the code: [code] #!/usr/bin/perl -w $thinkingof = int(rand 10); print "Pick a number 0 … |
 | Hello I tried running services.msc from Run and I ended with the window opened, but not displaying any service, with a popup error: One or more ActiveX controls could not be displayed because either: 1) Your current scurity settings prohibit running ActiveX controls on this page or 2) You have … |
| | Hello all. Im a Java developer, but have been given the extra title of Perl developer also. So im new to the code structure. Basically Im trying to pull the width and height from a url example below and display in an error msg just to test: [url]http://...readimage?1234a&height=10&width=10[/url] [CODE] use … |
| | hi all, i am new to perl and i am trying to design a web form (login, registration, user profile, session, cookie, mysql database connection, etc) using perl. is there any place where i can get a good tutorial on the above, or is there any existing code i can … |
| | hey.. Ive done a bit of java and im new at C... so forgive the inexperience/noobage here.. I got 2 problems, I want my program to read in 2 fractions and print the product.. and whenever I press enter without entering any value, ie. a null input, I want it … |
| | Sample content of the file [CODE] PP: Happy Sunday! PP: It's a good weather. PP: Have a blessed Sunday everyone. the output should be HL: Happy Sunday! PP: It's a good weather. PP: Have a blessed Sunday everyone [/CODE] My code to generate that [CODE] $length=@fileinput; if($line=~/PP:\s/) { {if($j<$length) {if($line[$j-1]!~/PP:\s/ … |
| | Hello everyone who reads this. I am currently creating a program in which the user inputs a booking reference which will allow them to overview flight details that they have added to previosu flights. I have been having trouble working out which direction I should follow to sort out this … |
| | Hello, I am having trouble understanding why I'm getting these errors. a4.c:106: error: expected expression before ‘int’ a4.c:106: error: too few arguments to function ‘ass_average’ a4.c:109: error: expected expression before ‘int’ a4.c:109: error: too few arguments to function ‘ass_min’ a4.c:112: error: expected expression before ‘int’ a4.c:112: error: too few arguments …  |
| | Having spent the last 6-9 months getting to grips with the basics of PHP, I have inherited a number of Perl scripts. As I'm getting on with PHP and beginning to complete ever "complex" tasks, I would like to convert the inherited Perl into PHP. I am able to translate … |
| | With over 15,000 wood names in the wood knowledge base I am building (at [url]www.prowebcanada.com/taxa[/url]) it has become practically essential to add a versatile search engine to extract queries from the MySQL files. I started with an online template and have brought it quite a way along but some things … |
| | Hi there, I have wrote a program that do a bit of calculations that takes about 10 min to complete, therefore I need to show a progress to user. I used a percentage in status bar to show the current status of program. The problem is for updating the number … |
| | Hi, Please help me out. I have successfully binded to my ADSI server(windows 2003 machine) from my windows XP machine? #LDAP SEARCHING [CODE][B]my $ldapSearch = $ldap->search(base => $ldapbase, filter => "uid=$login"); die "There was an error during search:\n\t" .ldap_error_name($ldapSearch->code)." ". ldap_error_text($ldapSearch->code) if $ldapSearch->code; print "No results returned\n" and exit if( … |
| | What is map doing below? [CODE] my @aFN = (); #------------------------------------------------------------------------------- # get the nodes #------------------------------------------------------------------------------- if (-e $fConfFN) { open CONF,$fConfFN; while(<CONF>) { chomp; if( /.*=(.*)/ ) { my @A = split /\s+/, $1; [COLOR="Red"][B]map{push(@aFN,$_)}@A;[/B][/COLOR] } } close CONF; [/CODE] |
| | Hello world, I’m trying to call from one PERL script (file) to another PERL (file) script passing arguments. The case is that I want to do it running multi threads. Example: I have 2 arrays. [CODE] Array1 = (“arg1”,”arg2”); Array2 = (“arg1”,”arg2”); [/CODE] In parallel mode I want to run … |
| | Sorry, maybe I post this in the wrong section. But, I hope it is simple enough to be answered :) I have .dot ms word template with mailto hyperlink. something like: [U]neosonic@neosonic.com[/U], link to mailto: [email]neosonic@neosonic.com[/email] I have tried to edit it manually in the .dot file, and that mailto …  |
| | hi, Please see my code as given below: [CODE]#!c:/perl/bin/perl use strict; use warnings; use CGI qw(:all); #use for all code use Net::LDAP; use Net::LDAP::Util qw(ldap_error_name ldap_error_text); #use for Error Handling print "Content-type: text/html\n\n"; print "<body bgcolor=\"#ffcccc\">"; my $entry; my @uids; my $serverlogin='administrator'; my $serverpassword='xxxxx'; my $LDAP_SERVER="localhost"; my $LDAP_PORT="389"; my $LDAP_BASE="ou=student,dc=ac,dc=in"; … |
| | Hey, I have a function, though it's not working as it should be. My program is Dijkstra's algorithm, and I am trying to build a list of a node's nearest neighbours using info contained in a text file of the network (7 nodes in this case), in the form: 0,2,4,1,6,0,0 … |
| | Hello Guyz This is my first post here. I am having problem in vb.net I am trying to get a webpage source using this code. [CODE] Dim request As System.Net.HttpWebRequest = System.Net.HttpWebRequest.Create(Textbox1.Text) Dim response As System.Net.HttpWebResponse = request.GetResponse() Dim sr As System.IO.StreamReader = New System.IO.StreamReader(response.GetResponseStream()) Dim sourcecode As String = … |
The End.