So, I made a little program to monitor a directory (FTP) for incoming files of a certain name and type. If a match, it processes the file. This is all working super, and as a PHP guy, I'm qu...
Hi everyone.
Sorry if im slow on the pick up here.
Im trying to recursively do a replacement of code in a lot of files, and nearly there, but not quite.
If someone could see or help m...
Hi everyone,
I currently have a perl script that looks at a directory, tallys up all the files in this folder and its subfolders, and reports the total file size in bytes.
Id like to mod...
Hello,
I have got one sql command which has got several "go" commands. I wan to
1. Remove go commands
2. And create separate array elements whereever go was found.
For. e.g.
SQL1...
=**************************************
= Name: Administrator Log Backup Script
= Description:This code was original mad
= e for personal use to monitor all my lin
= ...
hello there,
i want the perl script for sending an email.The problem was attached below as a file attachement.
Reddy.
Hello,
I need help with a perl script which would take in a filename as a parameter and do the following with it.
I have text file which sometimes grows more then a gb. This file consists ...
Hi All
I use this code to dynamically print the alphabet:
my @Alphabet = ("A".."Z");
foreach my $Letter (@Alphabet) {
print "$Letter ";
}
RESULT: A B C D E F G H I J K L M N O ...
I need to extract values from a xml file which would look like this
<E Name="E" RdfName="EnumA" Namespace="abc">
<Label Label="E"A/>
<EnumValue Name="S" RdfName="xyz" Value="1" Namesp...
Hi,
I made a csv file on a windows machine, its contents are just like:
5 10 15
2 4 6
3 6 9
I tokenize the input, then just print the matrix as a test. I print brackets around...
What does this in Perl do :
@$array1=map{defined $_ ? $_ : 'X' } @$array1 ;
Thanks in advance.
A while ago, I had gotten the following Perl script to do the following...
1. I have a collection of about 100000+ files located in a windows directory called C:\RawFiles with a variable nu...
Hi All
How do I pass a variable to Business::UPS
This works:
use Business::UPS;
my ($shipping,$ups_zone,$error) = getUPS(qw/GNDCOM 07719 08846 12/);
print "$shipping";
This Fai...
I need to mod an example script to run on my machine. The script has line:
use lib qw(/usr/local/apache/lib/perl);
but my machine doesn't have this path b/c I installed most everything with...
I have a simple finite directed acyclic graph (DAG) stored in two tables
- Nodes (node primary key)
- Arrows (parent , child, primary key (parent, child))
Both parent and child in the A...
Hi,
In linux I can find the type of file with the file command. E.g.
file test.pl
test.pl: perl script text executable
What is the perl way to get the same information? Or should ...
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 ...
Hi guys, hope u r all well and can assist :>)
##############################################
What Id like to achieve with a backup script:
##############################################...
Hi,
How can I create a folder (i'm on a win32 machine), but only do it if it doesn't already exist?
I tried just 'mkdir' but it says "Permission denied".
Thanks
Hi,
A web form I implemented many years ago (so long that I used PERL instead of PHP which I hardly remember now), is being inundated with SPAM. Evn though the messages only go to the webs...
Not being an expert in pattern-matching, I've been struggling with this for a while and I think there's a simple solution. I want to substitute a letter A-J for any number 0-9 which appears a...
Hi,
I know the $_ operator is some global general storage for 'stuff' in certain operations, like:
while (<>) {
chomp;
}
that is reading a line from input into $_ t...
Hi,
How can we add a hash within a hash, then access it, something like:
my %hash = ();
$hash{girls} = (
mary => "89",
kate => "92"
);
$hash{boys} = (
john => "91",...
I have been asked to modify a Perl script. No problem, so I thought< unfortunately the previous programmer used something I am not familier with in his code and would like some help on how to...
Hi,
Trying to figure out how perl interprets some statements. I've got this:
my @array = 1,2,3,4,5,6,7,8,9,10,11;
print(length(@array));
# prints "1"
If I put parenthesi...
