Hi,
How could I give a perl script a top level folder (win32) and have it delete all sub folders (and their sub folders) that have a particular name? For instance:
Parent
...
Hi everyone..
Is there a linux command that when run, can issue just the directory path only, and with that in mind, just the top level directory paths of a subdirectory of a given director...
I have pom.xml files for different modules in different folders, I am trying to update version in these pom.xml file, and this is where I am trying to update version number
<modelVersion>4....
I try to parse the tomcat error log to generate short error report which only show the unique error messages.
For example, the error messages in tomcat.error.log.1 look like:
===============...
Hi,
I need to find characters say, '*' from the content of the file and replace it with something else.
Basically '*' occurs in the file, I want to replace with something else.
I have thi...
Using ActiveState Perl 5.8 on Windows Server 2003:
About the system landscape:
I wrote a script to delete files more than a month old and was forced to use perl's "unlink" call since the ...
I have a text file that has rows like this:
Test|Test|55555555|Su|Super|\ |01/12/1988|||||||Super_Su@test.edu|2010|F|Su, Jones|555-555-5555|Parent/Child|
At the end of each row is a pipe I...
Hello coders,
I am trying to work with XML::Simple, but so far its been difficult for me. Here's what I have so far:
use strict;
use XML::Simple;
my $inp_file="PS_VENDOR.xml";
my ...
my $message;
for ($i = 0 ; $i <= $#param ; $i++ )
{
print $param[$i], "\n";
$message = join ( $message, $param[$i]);
}
print $message, "\n";
I am novice in perl. H...
I am currently using this code (in summary) to loop through my array -- but after once through - it ends.
------------
@all_load_files = glob("${path_gfr}\\ess\\${cube}\\datafiles\\*_Parms....
Problem: I have a bunch of files that are missing an extension and need to find a method to rename them.
I figure the following so far, and please if a better suggestion is available feel f...
This is a complicated assignment for a programming class in perl that I am lost in trying to figure out. I can get the five cards from the top of the deck but shuffling using pop, shift and pu...
I have been working with Perl and Mysql for about two weeks. The program needs to be able to insert into table, data coming from a text file. the values in the insert are defined a=> example: ...
Hi everyone i hope all of you are fit and well and would love your input.
Guys, I have been working on a project sending a variable to a perl cgi script from a php page.
##########
OUTC...
I am trying to configure my ActiveState Perl on my Apache server running Windows 2003.
I followed the directions on this page but every time i try running anything I am getting a 500 error...
I have this code that calls two shell scripts and stores the output into variables. Both shell scripts produce numbers (a string of numbers).
I'm trying to do some math with these two numbe...
I am trying to use a lib file in this program but when I execute Ctrl-D to use the functions from the lib file
i get errors . My question is how to call the routine from another file ?
...
I'm trying to run this perl script on RHEL5 but I keep getting this error "Can't locate Digest/Perl/MD5.pm in @INC". The rest of the error message actually lists what @INC contains (paths). ...
I have a script to parse logfiles with fields these fields: servername, freepercentage space, date
I have provided just a snippet of the code below. The program prints out a table to HTML w...
Hi Experts,
I have to extract the character string from the RPM name using perl script, can anybody help me.
for e.g.
Name of RPM pcre-4.5-4.el4_6.6.i386.rpm, i want string before hyphe...
I would like to find all files NEWER than reference file. I have already found reference file, but I am stuck now.
Can anybody help me to understand how to make it work?
I have a small section of html code which I have attached. This is just a small portion of a > 1mg html file. I want to parse the file and find all users (defined as schd_ftp_usr_2230_1 wher...
Why doesn't this script print:
one
two
three
-------------------
#!/perl
$input = 'one|two|three';
($one, $two, $three) = split ('|', $input);
print "$one\n$two\n$three\n";
Hello,
How do I get Perl to recognize double quotes (") as an input argument? For example:
perl.exe invoke.pl TEST xmlns:ns1="http://www.example.org"
and I need the 2nd argument to ...
Hi,
There is a file in a directory, containing lines which start with a unique identifier. Example : FF3M6TC02TT656 AGCGAC-GCTATGAT
What I need the script to do is that when a user suppl...