[perl] Forum Topics

I am building some SW modules in Linux environment and at the end of a build the artifacts are stored in the env in a particular folder called HW. This HW folder contains a number of folders underneath for individual targets and those contains one or more folders and files …

Hello - This is my first perl scripting try. I am trying to read a file into a hash so i can track it by id the file looks like this: ID FILNAME SIZE 1 logfilename 346202741018308 2 logfilename 0261512802421464 3 logfilename 612262297692848 4 logfilename 3268022049187 5 logfilename 888755246426701 6 …

Anyone got any example for me to test on the Win32::Process::Create to run on Window64bits, doubt that function couldn't be run. Any lib need for this to run on Perl 5.10.1

Help me: [CODE]<input type="checkbox" name="cd[]" checked="checked" value="1"> JAVA<br> <input type="checkbox" name="cd[]" value="0"> PERL<br> <input type="checkbox" name="cd[]" value="0"> PYTHON<br> <input type="checkbox" name="cd[]" value="0"> C#<br> <input type="checkbox" name="cd[]" checked="checked" value="1">[/CODE] i want to get all value(check and uncheck). But my array show array(1,1). i need array(1,0,0,0,1). And when i checkbox is checked(change …

Hi, we have some scheduled jobs.The jobs will truncate the data and inserting the data and update the data.This process will happen daily. we receive files like truncate_file,Insert_file and update_file to our INBOX in scheduled time.once we got the update_file we will connect to front end application by using user_id …

I got a file: [CODE]I wake up in the morning What time? Always wakeup at 6am.[/CODE] what would be an easy way to determine the number of white spaces between each word? Thanks in advance David

Well, i won't be programmer, but programming is a part of my life i like it. I Really confused, im 22 years old, and im in Informatic HSchool, i know that if i follow to be programmer that is good thing because i like it + as i know programmers …

so i need to have a script that takes input from a command and parses it for some info im still pretty new to perl, but from what i understand, to do something like that youd have something like: [CODE] while ($line = <STDIN>) { blah blah blah } [/CODE] …

Is it possible to take video data from one online resource and convert it to another format or quality like avi to 3gp,etc from high quality to low with server side scripting languages PHP, PERL, ETC.

I have a file of format: BRAND VERSION MODEL OPTIONS BOUGHT ------ ------- ------- ------- ---------- toyota lxi 2007 4 years ago nissan mxi 2008 3 years ago Actually the formatting goes awry when I save- So its Brand(toyota nissan under it) VERSION(lxi mxi under it) MODEL(2007 2008) OPTIONS -this …

hi im a beginninger at perl/cgi and this cookie is hard to understand lol. I'm trying to modify the script so that it displays an appropriate Web page if the name passed to the script is blank. but i get this in the browser: CGI Error The specified CGI application …

Hi Experts, Please help me, i am writing code for csv conversion, in middle i facing one issue. i have one array which contains 3 elements like wise @array contanis: var1= '455,0,0,0,0\n 135,0,0,0,0\n 199,0,0,0,0\n', var2= '131.253.4.131,1,0\n 131.253.7.54,1,0\n 10.80.5.3,1,0\n'; i need to convert like wise as below var1= '455,0,0,0,0 , 131.253.4.131,1,0\n …

I have two lists: list1 and list2 listing a set of files. For each file in list1 if a corresponding file exists in list2, I want the script to print the columns of common files. EX: list1............data1 1aw7_AB.fit => 1 2 3 1bjw_AB.fit => 9 4 7 1biq_AB.fit => 8 …

Hi, This is my first post in the forum. I got a situation where i have to find a file in a folder based on its extension and there by use the file name and contents of the file. Thanks for the reply.

Hi, My program does 2 functions i.e. a) It creates text files b) The text files gets copied to some other locations. The program is as below: [CODE] $n=5; #Count of files to be created. for($i=0;$i<=$n;$i++) { print "\n$i file is getting created \n"; open(FH,">file_$i.txt") || warn "cannot create a …

I'm trying to convert a bitstring to a signed 32 bit integer value. The bitstring is in big-endian. I can get this to work for unsigned values, I use: [CODE] sub bin2dec { return unpack("N", pack("B32", substr("0" x 32 . shift, -32))); } [/CODE] But I can't get it to …

Hi all, As the name suggests, sriptingnoob by name scriptingnoob by nature! I really need some advice, as I am loosing what little hair I have left. I have a file which contains lines similar to these MACHINE[1]=192.168.10.1 HOSTNAME[1]=MACHINE1 LOCATION[1]=UPSTAIRS MACHINE[2]=192.168.20.2 HOSTNAME[2]=SAGE LOCATION[2]=UPSTAIRS PRINTER[3]=192.168.10.56 etc I want to write a …

Hello All, Could you please help me with the following VBA code that I have to understand (but I am not aware of VBA) [CODE]Public Function ErlangB(Servers As Single, Intensity As Single) As Single 'The Erlang B formula calculates the percentage likelyhood of the call ' being blocked, that is …

Hi Everyone, I'm new the forum and also Newbie to Perl programming. Please go easy on me. Any help or input will be appreciated. Thanks so much. Ragards, Vincent. I have the following requirements that need to write in Perl. Sorry for the long sentences below. Also please see attached …

Hi everyone.. I am trying to write a perl code which appends a text file after taking two inputs from the user. It saves the file in tab delimited format. I have the input text file attached here. Now I want the file to check if the user given input …

is there any way to access some hyperlink on another webpage? the problem is that link always changes. thanks :)

#================================== # Script: Finding and Replace word in excel # #======================================= use Spreadsheet::ParseExcel; use strict; use Win32::OLE; use warnings; use Cwd; use Win32::OLE qw(in with); use Win32::OLE::Const; use Win32::OLE::Const 'Microsoft Excel'; $Win32::OLE::Warn = 3; # die on errors... my $oExcel = new Spreadsheet::ParseExcel; my $oBook1 = $oExcel->Parse('path/find.xls'); my $Excel = …

My new Dell Latitude runs Windows 7 Professional. I previously worked under Win XP Pro. The previous (XP) machine was used as the development platform for a website, which mined a database using Perl scripts. I need to recreate this functionality on the new machine, but it appears that Perl …

Hi, I'm reading a file and trying to write it out with the current date in the file name. But I'm getting an error when trying to run this code[CODE]use D_Db; my $dbh = D_Db::connect('EDW'); my $Curr_dt=D_Dates::get_curr_ccyy_mm_dd({dbh=>$dbh}); my $sth4BobExt=$dbh->prepare("Select * from TableX"); $sth4BobExt->execute(); while ( my @BobExtrow = $sth4BobExt -> …

Hi, I'm currently a student of the Senior Year at RIT Information Technology. I'm working alongside my studies as a TA on my college for classes: Programming in Java I, II, II, Computer System Fundamentals, Intro To Networking and Programming in Perl. During the summer I work as a PHP, …

Hi Experts, Here i have trying and written the perl script for extract the information from csv file and create the output to another csv file. Contents are occured in row by row format in attached input file and also i have attached corresponding out file also. [CODE] my $dir …

[CODE]void printer(char x) { int d, b, z; for(z=x; z>=1; z--) { for(b=z; b<=x-1; b++) printf(" "); for(d=z; d>=1; d--) printf("%d ", d); printf("\n"); } }[/CODE] that's my code which is supposed to print 4 3 2 1 4 3 2 4 3 4 when input is 4. however, it …

Hi, I'm using sql to extract data from the database tables. But the jobs are scheduled on Controlmem which are driven by the perl script. I'm still new in perl and I noticed that in order for the extracts to work I must have a -noq in the job. My …

Hi..I am a newbie in JavaScript.I have two forms (in two different webpages) all with radio buttons. A user cannot select more than one option from each form. My plan is to pass the user input from both the forms to a perl script which would then query a MySQL …

Hi all, I am facing a problem here which would like to seek helps from the experts. I have a table which is able to display all the data in text field format from the database in a table. The users are able to edit the displayed data. I would …

Dear Experts, Here i am written code for convert the text to CSV file conversion. i am facing a problem in while compare the two array to print the values row wise. below i have mentioned my code,input and output format. input : "OC192-11,OC192:CVS,0,COMPL,NEND,RCV,1-DAY,02-11,00-00,1" "OC192-11,OC192:ESS,0,COMPL,NEND,RCV,1-DAY,02-11,00-00,1" "OC192-11,OC192:SESS,0,COMPL,NEND,RCV,1-DAY,02-11,00-00,1" "OC192-11,OC192:SEFSS,0,COMPL,NEND,RCV,1-DAY,02-11,00-00,1" "OC192-11,OC192:CVL,0,COMPL,NEND,RCV,1-DAY,02-11,00-00,1" "OC192-11,OC192:ESL,0,COMPL,NEND,RCV,1-DAY,02-11,00-00,1" "OC192-11,OC192:SESL,0,COMPL,NEND,RCV,1-DAY,02-11,00-00,1" …

i am new to perl, before i ve ben working on php i want to knw that how i can run myperl script using wamp or how to activate perl in xampp please if any 1 can help me out

Hello, I am new to Perl and am trying to write a script that will take a list of MAC addresses from a text file, and use them as parameters for a command line "wake on lan" executable program. The concept seemed simple enough. It's basically a batch script written …

Hello there, I installed [URL="http://www.activestate.com/activeperl"]ActivePerl[/URL] (I kept all default settings) and also downloaded [URL="http://search.cpan.org/~srezic/Tk-804.028/"]Tk 804.028[/URL] and extracted it to C:\Tk-804.029. I'm wondering why I keep on receiving this error whenever I run this simple script on my command prompt window (I'm using Windows XP Pro). [QUOTE]Can’t locate Tk.pm in @INC …

I'm trying to convert html to plain text (remove all html tags) I don't want to use regex so I tried the module HTML::Parser and tried the parse() function but i got this error [CODE]Undefined subroutine &main::start called at getwords.pl line 27. [/CODE] and as a matter of fact I …

Please Help me to extract the inner table to the outer table so that it will not have table within table because it is not good data.. thank you Raw Data [CODE]<item> <pre> <table width="100%" border="0" cellpadding="2" cellspacing="2" bgcolor="#eeeeee"> <tr> <td><p>"Gratitude for the abundance you have received is the best …

hi i am using webservice i added web reference into my project to call webservice method but below error was happend when i execute my project A connection attempt failed because the connected party did not properly respond after a period of time, or established connection failed because connected host …

I am writing a script in perl for my project. I have given a snippet of the files below start.pl contains: system("/ws/nibalan/submain.pl"); submain.pl contains: system("/ws/nibalan/submanual.pl") open(INPUT, ">/users/$login/input"); - - some writing into input file submanual.pl contains: open(INPUT, "/users/$login/input"); open(MANUALANS, ">/users/$login/manualans.pl"); - - some writing into manualans.pl file While trying to …

Hi there, I am in the process of implementing draggable/droppable interaction using the JQuery UI. This is something that I have very little experience with so please be gentle. I can drag and drop using <tr> elements which looks great, but I need to get the <tr> attributes (perl variables) …

Hi Experts, Recently i written the script for text file to CSV file conversion. my script has read the directory and it would process the each file by file based on iteration. Coding and output was fine. i need to improve to speed up the script to convert the csv …

Dear All, Can anybody tell me how to autoincrement the Hexa decimal value. For Ex: I am having the value FF0B in Result array and want increment it to FF0C. Now Result array should contain two values.

how can i get a variable inside a package example: [CODE] { package example; my $baz = "sometext"; sub new{ my $self = shift; bless \$self; } } my $foo = example->new; [/CODE] how can I get the value of $baz i tried [CODE]print $foo->{vv}; print $foo::vv[/CODE] and no luck …

All, I have a simple question. What is the standard procedure for retrieving form values via POST method in a web form? Perl can be extremely awkward for web programming, I'd normally use something else, but in this case I need to use Perl for the CPAN module. Anyway, back …

Hii I am New in SalesForce CRM and i am facing big problem with Salesforce Web To lead form what i did i have created landing page and in which one lead Collection Form connected to Sales Force CRM now what is the problem i am facing is when i …

I posted a similar thread back in Nov and got some great help. I'm modifying the code to be useful to not only compare multiple columns from two separate files, but also to classify each line from @hairpin to determine if the parameters fall within any of the ESThits, outside …

Name: Airil Hafiiz Nickname: airil Height: 1.70m Weight: 63kg Hair: Black Eyes: Brown Location: Malaysia Age: 23 Hobbies: Sports, fitness, movies. Relationship Status: In a relationship Favorite Music: Universal Education: Bachelor of Degree in Computer System Engineering Favorite TV Shows: Top Gear, Glee, Hom I met Your Mother Favorite Sports …

hi..i am new to perl language..ive given a task to extract some info from a logfile and print the extracted to a new file..what make it difficult is because it need to extract vetically..for example below with some conditions; [ICODE] ------------------------------------------------------------------------ C H W S Z S W T C …

Hi, I have been trying to execute this program and i am getting an error. Kindly help me. #!usr/bin/perl -w # The filename of the file which contains the protein sequence $proteinfilename = '/users/sukeerthiteja/desktop/perl/NM_021964fragment.pep'; # First open the file and associate a filehandle with it. for readability purpose lets use …

Hi all, am using a regex (in php), but I'm all confused. I'm trying to replace a string ('di') with 'deu'. SImple enough, but I don't want a replacement if 'di' is preceded by 'io' as in 'iodine', 'iodic', 'iodide' etc. This is what I have: [CODE]'/(?<!io)di/i'[/CODE] It works fine …

Hi, Could any one tell me what is wrong with my code? It does not time out after 5 seconds which is what i need. It remains in the infinit loop. [CODE] #! /usr/bin/perl use strict; use warnings; sub comeOut; $SIG{ALRM} = \&comeOut; while (1) { }; eval { alarm …