or confess "SMTP data: " .
>> $smtp->message();
>> $smtp->datasend($theBody) or confess "SMTP datasend: " .
>> $smtp->message();
>> $smtp->dataend() or confess "SMTP dataend: " .
>> $
both likely arrived at
>> webmas...@hostgator.com <mailto:webmas...@hostgator.com>.)
>>
>> I am not trained in computer tech; I’m just a 78 year old high school
>> teacher who bought a few books on perl, so I don’t really understand
>> how to fill in the many v
e, but pretty good.
>
>
>
> Mike
>
>
> On 7/1/23 13:49, Rick T wrote:
>> My web hosting company is closing business, and I less than two weeks to
>> move my five sites to another host. All of these use perl. If you have
>> experience with a host that suppo
rts could not be seen in advanced stage of pregnancy and due to
> poor or inadequate acoustic window. Sometimes not all four limbs can be
> clearly visualized due fetal position and acoustic window. This has been
> clearly explained to the patient.
>
>
>
> So what is the problem? It sound
4.20%*
*EFW-GP(AUA)(Hadlock): 32.28%*
*Doppler Measurements*
*FHR: 150Bpm*
*Ultrasound Image*
*Comments: *
*Signature(seal): *
*Date Signed: *
On Tue, Jun 14, 2022 at 10:56 AM perl kamal wrote:
> Hi, Greetings!!!
> I am trying to process an rtf file , get the co
@mflan.com
I have attached a file to see if the list accepts attachments.
Mike
On 6/14/22 00:26, perl kamal wrote:
> Hi, Greetings!!!
> I am trying to process an rtf file , get the content from a
> paragraph,construct a table with the processed data and update it at
> the &q
tions will be much appreciated.Thanks.
#! C:\Strawberry\perl\bin
use strict;
use Win32::OLE;
use Win32::OLE::Const;
use File::Spec::Functions 'canonpath';
#use Data::Dumper;
use File::Basename;
use Cwd 'abs_path';
use utf8;
use Encode;
Win32::OLE->Option (CP => Win32::OLE::CP_UTF8);
my $do
to figure out
> what is wrong, and what to do about it, but for well maintained
> packages in a Unix-like environment that is rare in my
> experience..
>
> You can read about cpanm and how to install it from the Git repo
> readme:
> https://github.com/miyagawa/cpanminus/tree/devel
. Fortunately I’m beginning to get the hang of Template Toolkit, and
>> I may need it for more complex situations that come up. Switching from
>> HTML::template this year was a challenge, and I had to rewrite a lot of my
>> perl to go with it. I know that most perl people are good at u
t;
> If only there were 'strict' and 'warnings' for Template! :-)
>
> Andrew
>
> On Sun, Oct 28, 2018 at 8:52 PM Rick T <mailto:p...@reason.net>> wrote:
> As a novice in perl I realize that it’s a bit presumptuous for me to attempt
> references and complex data structur
trying to wean myself from CGI.pm, an easy task for most of you, but I
>> am a beginner. The code below works, but that does not mean it always will or
>> that it cannot be improved. I found the main part of this in CGI Programming
>> with Perl, which is 18 years old, and I’ve given up hop
er
> argue with him.
>
> On Fri, Jul 27, 2018 at 1:37 PM, Rick T <mailto:p...@reason.net>> wrote:
> I tried to implement some advice about slurping that I read on this mailing
> list (using local) but cannot get it to work. I get the message “Value of
> construct can be "
Many thanks to Shlomi and Uri: as always, you’ve greatly boosted my
understanding of Perl! — Rick
> On Jul 4, 2018, at 9:35 AM, Shlomi Fish wrote:
>
> Hi Rick,
>
> On Wed, 4 Jul 2018 09:16:19 -0500
> Rick T wrote:
>
>> The following line works, even thou
Impose lower case
>>$student_id =~ s/\s//xmsg; # Remove whitespace
>>
>>$student_id =~
>>m{
>>\A([a-z]+) # match and capture leading alphabetics
>>(-) # hyphen to separate surname from student number
>>
*search.cpan.org <http://search.cpan.org> is shutting down*
For details read Perl NOC
<https://log.perl.org/2018/05/goodbye-search-dot-cpan-dot-org.html>. After
June 25th this page will redirect to MetaCPAN.org <http://search.mcpan.org/>
So does as well as Perl?
Many thanks for the very helpful comments from Andrew and Andy. For the first
time, I have a clear idea of what local and auto flushing are doing for me. I
know I’d get educated here!
--
To unsubscribe, e-mail: beginners-unsubscr...@perl.org
For additional commands, e-mail:
Hello All,
I would like to read multiple files and process them.But we could read the
first file alone and the rest are skipped from the while loop. Please
correct me where am i missing the logic.Thanks.
use strict;
use warnings;
my @files=qw(Alpha.txt Beta.txt Gama.txt);
foreach my $file
Thanks for your valuable comments.
On Thu, Dec 24, 2015 at 2:09 AM, Shlomi Fish <shlo...@shlomifish.org> wrote:
> Hi perl kamal,
>
> On Wed, 23 Dec 2015 19:58:04 +0530
> perl kamal <kamal.p...@gmail.com> wrote:
>
> > Hi,
> > I am trying to retrieve the
Hi,
I am trying to retrieve the port details by the process id as like below,
but it fails.
my $port = `ss -l -p -n | grep $pid| grep -v grep 2>&1`;
When I manually issue the command with the pid, it yields the output.
Will you please suggest/correct me.Thanks.
++Subject & Thanks.
On Thu, Dec 17, 2015 at 1:08 AM, perl kamal <kamal.p...@gmail.com> wrote:
> Hi,
>
> I am trying to read a json output file,capture the required information,
> storing them in an array and format the output in a file.
> Please review my code and su
Please find the attachment.
On Thu, Dec 17, 2015 at 1:26 AM, Raj Barath <barat...@outlook.com> wrote:
> Can you share a simple of JSON file and from that let us know what you
> want to capture.
>
> On Wed, Dec 16, 2015, 3:41 PM perl kamal <kamal.p...@gmail.com> wrote:
Hi,
Thanks you for your valuable comments,let me try the Twig module.
On 12/8/15, Kent Fredric <kentfred...@gmail.com> wrote:
> On 8 December 2015 at 19:25, perl kamal <kamal.p...@gmail.com> wrote:
>> I am trying to parse the inner loop elements of the attached
strict;
use XML::Simple;
use Data::Dumper;
die "Usage: perl $0 path output_file\n" unless @ARGV == 2;
my $path = shift;
my $output_file = shift;
my ($name,$url,$value,$password,$user,$prop_name,$string);
opendir (DIR, "$path") or die "Can't open the dir: $!\n&q
Hi,
I have this following hash:
#!/usr/bin/perl
#
use strict;
use Data::Dumper;
my %MYROUTES = (
ROUTE-252 = {
# src = dest
427 = ABEP,
ABEP = 441,
441 = 427,
427 = 444,
444 = MGWQ,
MGWQ = CDEF
},
ROUTE-432 = {
AAA = BBB
Hi,
Does anyone know of any great source/link for tutorials on menu driven Perl?
Thanks in advance.
So assuming I write
for my $loopiter (0 .. $loopmax) { #1
if ($loopiter = ($loopmax - 1)) { die Loop number $loopnum has
iterated $loopiter times }
$termnum[0] = int( rand($defnum) );
last unless ( $termnum[0] == $lastnum );
}
jimsgib...@gmail.com
To: Perl Beginners beginners@perl.org
Sent: Mon, September 17, 2012 10:18:16 PM
Subject: Re: Proposed correction
On Sep 17, 2012, at 6:52 AM, Shlomi Fish wrote:
Hi,
I apologise for having sent that to Dr. Rathbun in private - that was not my
intention but a misuse
sample code
below is a big help. Thanks again.
On Sun, Sep 16, 2012 at 12:28 AM, Rob Dixon rob.di...@gmx.com wrote:
On 15/09/2012 02:52, newbie01 perl wrote:
Hi all,
I have a config file that contains some text as below:
server01:/u01/app/oracle/admin/db01/adump
OK, here's my amateurish attempt at a correction:
#!/usr/local/bin/perl
use warnings;
use strict;
use diagnostics;
use CGI;
my $cgi = new CGI;
use Mail::Sendmail;
use CGI::carp qw(set_die_handler);
BEGIN {
sub handle_errors {
my $msg = shift;
sendmail(
From = 'i
/bin/perl
use warnings;
use strict;
use diagnostics;
use CGI;
my $cgi = new CGI;
use Mail::Sendmail;
use CGI::carp qw(set_die_handler);
BEGIN {
sub handle_errors {
my $msg = shift;
sendmail(
From = 'i...@theinfosite.com',
To = 'jmrhide-theinfos...@yahoo.com
of the loops misbehaves. Did
I
make any obvious logical or grammatical errors in the snippets of code below?
to be nice, there are too many logical errors to even count. somehow you got
this working but redoing it to reasonable code will be a major project.
#!/usr/local/bin/perl
use warnings
for (my $loopiter = 0; $loopiter $loopmax; $loopiter++) { #1
if ($loopiter = ($loopmax - 1)) { die Loop number $loopnum has
iterated $loopiter times }
$termnum[0] = int( rand($defnum) );
last unless ( $termnum[0] == $lastnum );
}
As requested, I ran perltidy on my script to see if I could make it easier for
somebody else to read. Perhaps a little explanation of how it works would also
be helpful:
Tutorial.cgi is triggered by a user who wishes to enlarge his/her vocabulary
of
technical terms in a certain field. The
#!/usr/local/bin/perl
# use warnings;
# use strict;
# use diagnostics;
use CGI;
my $cgi = new CGI;
my (
$topic, $score, $lastnum, $answer, $anum,
$bnum, $cnum, $dnum, $enum,$smarts,
$playlevel, $c_topic, $c_smarts, $c_playlevel, $c_score
# PRINT RESPONSE:
$c_topic = $cgi-cookie(
-name= 'topic',
-value = $topic,
-expires = '+1d',
-path= '/'
);
$c_score = $cgi-cookie(
-name= 'score',
-value = $score,
-expires = '+1d',
-path= '/'
an email every time it glitched! Does anybody have
a
sub written for that?
John M Rathbun MD
From: Jim Gibson jimsgib...@gmail.com
To: Perl Beginners beginners@perl.org
Sent: Sat, September 15, 2012 9:00:35 PM
Subject: Re: My long script
Please use the list
I appreciate the helpful input.
It appears from my server stats that the script in question has only run a
couple of times a day on average, so that's fewer than a thousand instances in
the past year. I ran LOTS of tests of the script, none of which hung or
produced
unexpected output.
If the
already have a script that does what
am wanting to do?
At the moment, am doing it manually reading one line at a time and using
awk and printf using the max string of each column as the basis for the max
length of the column for each field. Am wanting to be able to use Perl
instead.
Any feedback much
:
#!/usr/local/bin/perl
# use warnings;
# use strict;
# use diagnostics;
use CGI;
my $cgi=new CGI;
my ($topic, $score, $lastnum, $answer, $anum, $bnum, $cnum, $dnum, $enum,
$smarts, $playlevel, $c_topic, $c_smarts, $c_playlevel
, with all error
trapping enabled, no error appears on the server log.
Where I think we need to focus is, assuming the script runs to its end every
time, why doesn't it release its hold on the server resources? My hosting
service runs Apache version 2.2.22. I can't tell what version of Perl they run
I am using Win32::IE Automation to automate login of a page.
I could provide username and password in the respectivve fields,But the
login is a image on which I need to click. Below is the page source for
that login image .
a href=javascript:myjavascritp();img src=aa/bb/cc/dd/img_1.jpg
width=69
Hi all,
I am looking for a Perl script or something similar that I can use to test
connection from a client PC to several databases on a server.
Does anyone know of any such script lying around somewhere :(-
Currently, am testing connection from a client PC to an Oracle DB using
Oracle's
Hello and thanks for volunteering your time!
I'm returning to PERL after about a year and am struggling to remaster some
syntax:
#!/usr/local/bin/perl
use warnings;
use strict;
use diagnostics;
# Converts current directory to a list of links
my @dir;
my $name;
my $i = 0
Hi Gurus,
I have written a program that uses XML::LibXSLT. When i Run the program it
complain about not findind the XML/LibXSLT @INC.
I have installed perl-libxml and perl-lib-xslt successfully .Still my perl
progam complains about XML::LibXSLT not installed.
1) * when I run Perl MakeFile.PL
49422824237564 49185260 1% /dev/shm
dev0ns100:/vol/vol_ns953_snap/rac_shared
125829120 32990784 92838336 27% /nas_mnt/rac_shared
/dev/asm/akl1od200-335
786432000 312987896 473444104 40% /asm
The script is as below:
#!/usr/bin/perl
#use strict;
#use
Hi Brandon,
Thanks for your response.
Getopt::Std seems to be the simplest one, so am tryiing that one out first
:-) Am just trying to port 1:1. Quite painful trying to figure out how to
get awk-like behavior in Perl especially when trying to do some calculation
on some specific fields.
I've
Hi all,
Am trying to write/convert a customized df script in Perl and need some help
with regards to using arrays and file handlers.
At the moment am using
system(df -k /tmp/df_tmp.00);
To re-direct the df output. Am using df -k because some of the Solaris and
HP servers does not have df -h
Hi all,
Playing around with Getopt::Std as am trying to convert a UNIX Korn Shell
Script to a Perl script.
Is it possible to check for what are the values for opterr, optarg, optind?
How? :(-
I've been Googling for quite sometime now and can't find an example of Perl
scripts that checks
Shlomi,
I installed Terdata software packages like cli, teragss, and tdicu. I
edited windows hosts file.
Now I got the following error.
dmake.exe: makefile: line 871: Error: -- Missing targets or attributes in
rule
The following perl script is used to connect to SQL server database using
All,
I need help regarding install of CPAN modules in strawberry perl.
I have a question about Perl connectivity to Teradata. Is it the correct
email address?
I have been using Active Perl 5.12 on Windows xp since one year. I tried
installing a perl module from CPAN
and I got errors while
Paul,
I didn't understand. Please elaborate. I have sent email to dbi mailing
lists. I didn't get any reply.
Did you added CPAN modules into active perl or strawberry perl?
Have you built perl from source code on Windows?
On Wed, Sep 21, 2011 at 9:42 AM, Paul Johnson p...@pjcj.net wrote
Thanks for the reply. How to install the headers?
On Wed, Sep 21, 2011 at 11:23 AM, Shlomi Fish shlo...@shlomifish.orgwrote:
On Wed, 21 Sep 2011 09:31:01 -0400
Perl developer perldevelopm...@gmail.com wrote:
All,
I need help regarding install of CPAN modules in strawberry perl.
I
Hi John,
For checking a 10,+ lines, your code cut down the processing time from
30 seconds to a mere 5 seconds, amazing.
Thanks a lot.
On Thu, Jul 28, 2011 at 10:04 PM, John W. Krahn jwkr...@shaw.ca wrote:
newbie01 perl wrote:
Hi all,
Hello,
I've written a Perl script below
with spaces
- Then print out each line left-justified using Perl print formatting
Not sure if this is the best way to format the output to the one that I want
to but can't think of any way of doing it.
Preferably, would want to be able to show the df output in GB/MB as well.
That means I have to do my own
.
Code below or can be copied from http://pastebin.com/d8GNL0kx
#!/usr/bin/perl
use strict;
use utf8;
binmode STDOUT,:utf8;
use File::Find;
my $checkre = qr/(?|
(\()(?matched)([\}\]”›»】〉》」』]|$) |
(\{)(?matched)([\)\]”›»】〉》」』]|$) |
(\[)(?matched)([\)\}”›»】〉》」』]|$) |
(“)(?matched
Hi all,
I've written a Perl script below that check and report for malformed braces.
I have a UNIX ksh version and it took a couple of minutes to run on a 1+
lines. With the Perl version it only took about 20 seconds so I decided to
do it the Perl way. Besides I need a similar thing
to check for malformed stuff.
I believe Perl is very good at doing this kind of stuff. I've managed to
find some command line options from Google and trying that out.
For the meantime, hopefully someone from this group have had this same
problem in the fix and has a script that checks for malformity
Hi all,
Just want to know what improvement can be done with the code below if any. I
am sure a lot of improvement/changes is required. I will be calling this
script from a UNIX script, i.e.timediff=`timediff.pl $file`, so $file will
be passed to the Perl script. It's probably a good idea to check
Hi,
Does anyone know of any permission bit translator? One that can
translate the permission bit from its textual value to its octal value
and vice versa. It is alright if it is always just rwx but on a lot of
occasions nowadays, getting a lots of s, S, t, etc.
-rwxrwxrwx 1 oracle dba
Hi all,
Am wanting to get some advise on how to write this Perl script.
I have a backup directory that I have to check for the existence of file/s
and if the latest file that exist there is 2 days old, that means I have a
problem and had to send an email notification.
To illustrate
Hi there,
I'm using the FCGI module (version 0.67) and a lighttpd
to create an imageserver.
But currently I have the problem that if I
shutdown the lighttpd server, the perl processes are still there with an
open file descriptor to the socket.
There are not a child process
anymore
use strict;
use warnings;
use YAML;
use HTML::Tree;
use LWP::UserAgent;
my $ua = LWP::UserAgent-new;
my $response =
$ua-get('http://www.raaga.com/channels/hindi/moviedetail.asp?mid=H002927');
my $content1 = $response-content;
my $tree = HTML::Tree-new();
$tree-parse($content1);
my $article =
Hi,
Do the following set of codes does the same thing?
FYI, am more interested on whether I can use CODE 03 to pipe/re-direct
output from the OS commands, i.e. ps, df etc. Will using | works on Windows
as well?
Am very new to Perl and has mostly done UNIX shell scripting. Am wanting to
write
Hi All,
I am having a problem while isntalling Bugzilla , Checksetup.pl throws
errors and exits.Below is the detail.
when I run checksetup.pl in bugzilla folder I get the following error,
Though I have installed latest DBD-mysql which is available in CPAN.
ERROR
Hi All,
I am having a problem while isntalling Bugzilla , Checksetup.pl throws
errors and exits.Below is the detail.
when I run checksetup.pl in bugzilla folder I get the following error,
Though I have installed latest DBD-mysql which is available in CPAN.
ERROR
On 07/24/2010 10:48 AM, Owen wrote:
On 07/24/2010 08:53 AM, Owen wrote:
hi,
it got some error while adding data into sqlite through Perl script
on
Apache ... script can able to read the file but not able to write
.. I
have set the permissions of sqlite file to 666
Hi Brandon,
Thanks ... using the cat and pipe looks cleaner ... I will try that one
... thanks
On Fri, Jul 23, 2010 at 4:53 AM, Brandon McCaig bamcc...@gmail.com wrote:
On Wed, Jul 21, 2010 at 1:17 PM, newbie01 perl newbie01.p...@gmail.com
wrote:
Does $_ contains the following values
hi,
it got some error while adding data into sqlite through Perl script on
Apache ... script can able to read the file but not able to write .. I
have set the permissions of sqlite file to 666 ..
when i ran the script from local user its working fine .. its able to
write the data into db
when i
On 07/24/2010 08:53 AM, Owen wrote:
hi,
it got some error while adding data into sqlite through Perl script on
Apache ... script can able to read the file but not able to write .. I
have set the permissions of sqlite file to 666 ..
when i ran the script from local user its working fine
Hi all especially Perl teachers if anyone is ... :-)
I just want to know if someone can provide some explanation on how does the
argument iterator sub-routine below work. The Perl script is called from a
UNIX Korn script as below:
mail_smtp.pl -r ${MAILFROM} -s $subject_line TEST EMAIL
supportm
Hi all,
Does anyone know if someone had written a Perl stat script that mimics the
Linux' stat command?
I want to be able to use the stat command on Solaris, unfortunately, I just
found out that that command is not available on Solaris and HP-UX so am
thinking a Perl script should be the way
I tried to use LibXML .. when i never to the correct libXML read file
... when i tried to use the LWP download which is an XML .. how to use
it please help me ...
/use LWP::UserAgent;
my $ua = LWP::UserAgent-new;
my $response =
$ua-get(http://www.perlmonks.org/?displaytype=xml;node_id=3989;);
pi have tried to use the LibXML modules to xpath a document but its
getting complicated ..
i have seen this example over forum here ./p
code
use XML::LibXML ;
use strict;
use warnings;
{
my $xml = 'XML';
?xml version=1.0 standalone=yes?
sdnList
sdnEntry
lastNameHello
directory but exclude that directory, kinda like doing a grep
for ^/u01/oradump/cdump, /u01/oradump/cdump$/ and exclude that from the
directory to remove.
On Mon, Jun 7, 2010 at 4:32 PM, Uri Guttman u...@stemsystems.com wrote:
np == newbie01 perl newbie01.p...@gmail.com writes:
first off please
...
Your hacked pseudo-code works fine and does what am looking for ... Thanks
...
On Mon, Jun 7, 2010 at 6:45 PM, Uri Guttman u...@stemsystems.com wrote:
np == newbie01 perl newbie01.p...@gmail.com writes:
np Hi Uri,
uri first off please edit the quoted part of posts. only keep
Hi Uri,
Oops ... sorry, I think I've explained it wrong ...
I mean, supposedly, the script is to scan the sub-directories of $ARGV[0]
but not include $ARGV[0] in the list so I've modified the pseudo-code hack
that you provided to do just that ...
Hi all,
Oracle core dumps are created as directories. I want to remove these
directories after a certain period of time, for example 10 days.
I have the following script that searches a directory for files that are
older than 10 days and possibly remove them. At the moment, for the sake of
2010/6/7 Shlomi Fish shlo...@iglu.org.il
On Sunday 06 Jun 2010 19:59:36 Wojciech Łysiak wrote:
On 06.06.2010 18:12, newbie01 perl wrote:
Hi all,
Oracle core dumps are created as directories. I want to remove these
directories after a certain period of time, for example 10 days
On Mon, Jun 7, 2010 at 3:25 PM, Uri Guttman u...@stemsystems.com wrote:
np == newbie01 perl newbie01.p...@gmail.com writes:
np I found a better example at a Perlmonk posting and changed it a bit as
np below:
np #!/usr/bin/perl
np use strict;
no use warnings. bad. see below.
np use
Hi all,
I know perl -V prints what are the current modules directories that are
accessible ... but is there a way to list all the available modules from
each directories as well?
Hi all,
Sorry for being lazy I guess but am assuming a lot of you will probably
have a list of their favorite sites for resources of Perl scripts
I did find a lot as well via Google but mostly Perl CGI stuff though ...
Basically, am wanting to know where is the best place to find scripts
Hi all,
Just writing to ask if any one can advise on what tools to use best for
maintaining your scripts ... preferably free/open source and portable if
there is one, that is, one that can be placed and run on a USB stick ...
At the moment, am having them in directories and files and no
This is normally the basic when i added a xml file to the code
Code ::
/use XML::XPath;
use XML::XPath::XMLParser;
use Data::Dumper;
# create an object to parse the file and field XPath queries
my $xpath = XML::XPath-new( filename = test.xml );
print Dumper ($xpath) ;/
OutPut ::
/$VAR1 =
Hi,
Am trying out DBI for Oracle and just want to know if for example, I need to
include column formatting stuff etc., is it best to just put them into a
.sql file and then execute the .sql file instead of placing them in the Perl
DBI script?
Also, is there anyway to sort of hide the password
Hi all,
Just need to confirm if this is the expected behaviour when setting
PERL5LIB.
If I have the folllowing in my script ...
==
#!/usr/bin/perl
$ENV{PERL5LIB}=/oracle/product/db/11.1/perl/lib/site_perl/5.8.3/x86_64-linux-thread-multi
Hi all,
Can someone advise how to set LD_LIBRARY_PATH from within the Perl scripts?
If I set LD_LIBRARY_PATH from the command line, all is okay
[oracle ~]$ perl -e 'use DBD::Oracle; print $DBD::Oracle::VERSION,\n;'
Can't load
'/oracle/product/db/11.1/perl/lib/site_perl/5.8.3/x86_64-linux-thread
Hi all,
With multiple Perl install, there will be multiple versions of the same
modules.
How can you change the order of where @INC look for the specific version of
the module that you want to use? Is this done by using use lib?
use lib qw(/path/to/one/library /path/to/another .. );
Hi all,
Can someone please help and advise if it is possible to have the output of
the code below to the screen and at the same time to the file as well?
open(ORA, | dgmgrl dgmgrl.out ) or die Can't pipe to dgmgrl: $!;
print ORA connect
) ?
this begs the whole question of why the OP isn't using DBI.
yy 2010/5/27 newbie01 perl newbie01.p...@gmail.com:
Hi all,
Can someone please help and advise if it is possible to have the output
of
the code below to the screen and at the same time to the file as well?
open(ORA, | dgmgrl
Can anyone please recommend intermediate to advance perl online
courses/tutorials with focus on Object oriented techniques, if they know.
I am willing to pay also if it costs something.
Thanks,
-Ben
Hi all,
Instead of re-inventing the wheel, I would like to possibly use existing
Perl scripts that may already be available out there.
Scripts that am looking for are mainly maintenance scripts, i.e. remove old
files, rotate log files, remove old directory ( mainly core dumps directory
refer to another), too. So it all depends on the parser.
I'm not sure whether evaluating perl code would be fast than parsing YML,
but for a config file, I guess it wouldn't make much of a difference.
Unless the parser is really slow, it shouldn't matter since this is a one
time event
What is the use of Data::Dumper module?
can any body please give examples?
Have been using perl for some time and never used this module. Not sure if i
am missing something by not using it.
Thanks,
-Ben
I have used libpcap to capture data using Net::Pcap module ... and now
... i have been stuck with decoding... here is the code that i have
used http://cpansearch.perl.org/src/SAPER/Net-Pcap-0.16/eg/pcapdump
#!/usr/bin/perl use strict; use Data::Hexdumper; use File::Basename;
use Getopt::Long
Hi David,
Not being dubious, really am a newbie ... as far as Perl+DBI is concern. I
can look at Perl codes on the average but not if the whiz programmers start
using a lot of shortcuts etc My daytime job is as an Oracle DBA. Most of
the scripting I do is mainly UNIX scripting and very
Hi,
Does anyone have a UNIX permission bit calculator script that I can use?
Basically, am looking for one where I don't have to a ls -l to check the
permission on a file or directory. Am looking for a script that will display
the permission bits and then just display what those permission bit
HI all,
Does anyone know of any XML to text Perl script around that I can use?
Basically, I have an XML file that is supposed to composed of fields and
unfortunately on the server, I do not have a browser to view it properly, at
the moment, am downloading the file and then viewing it from my
Hi all,
If I declare a variable x1 outside of the sub that makes it global, right?
Now the question is can I have the same variable x1 as a local variable of a
sub, i.e. will the following work?
$x1 = cat;
sub sample()
{
my $x1=dog;
...
...
}
Just trying to work out some guidelines on
Hi all,
I need to convert a lot of UNIX scripts into Perl. Most of them uses the
UNIX's EOF/EOL functionality. These scripts are mostly used to connect to
Oracle databases. At the moment, installing a DBI is not an option. The
scripts will be running locally on the servers so technically
Hi all,
Am wanting to change my Perl scripts to get it to run on several UNIX
flavours and Windows. At the moment, the only way I can think of how to
accomplish that is always having the following checks on each and every sub
that I have.
Can anyone please suggest if there is a better way
1 - 100 of 730 matches
Mail list logo