09-24-2007
perl questions
New to perl and a few questions - usually used to shell scripting but have to write a script to check a few things on windows server and need help..
1. Check for file missing in sequence..
ie. list of file in directory as follows:
file0001.txt
file0002.txt
file0004.txt
file0005.txt
file0006.txt
How do I identify that file0003.txt is missing in the sequence ?
2. search files for a pattern and count the matching occurances?
ie. file1 contains
test
test2
test4
test2
test1
I want to know how to search for test2 and count number of matches.
I would prefer if these were as simple as possible.. simple questions I am sure but I havent used perl before..
9 More Discussions You Might Find Interesting
1. Shell Programming and Scripting
hi.
i´m working in bash and am trying to create a Perl daemon that controls bash´s behavior. this is actually in preparation for a later project i´ll be working on.
basically, i´m looking for a way to have the Perl daemon tell bash what to do. i already have a small daemon that simply prints... (2 Replies)
Discussion started by: deryk
2 Replies
2. Shell Programming and Scripting
Hi everybody,
I have been looking for an answer to this issue both on google and on the forum, but I couldn't find anything. please help me :eek:
As part of an automated (in perl) install of Solaris 9, I would like to be able to answer automaticaly to the question the installer asks.... (2 Replies)
Discussion started by: zaap
2 Replies
3. Shell Programming and Scripting
Hello guys,
While going over the book, I ran into this chess program and I have few questions
1) on line 40), why is not $chessboard-> ) ???
40 unless (defined $chessboard->) {
2)
20 foreach my $i (reverse (0..7)) { #Row
1 #!/usr/bin/perl -w
2 #
3 #
4
5
... (1 Reply)
Discussion started by: hankooknara
1 Replies
4. Shell Programming and Scripting
More questions for Perl on Windows (again I apologize its on windows... )
1. How can I check free disk space on a drive in windows using perl command in a script?
2. How can I check processes running using perl command (as I would normally be able to see in task manager for example)
3. I... (7 Replies)
Discussion started by: frustrated1
7 Replies
5. Shell Programming and Scripting
I need to write a script to telnet or ssh a device the execute some commands in device then copy the output in a file, I wrote the script but I faced one issue, when you execute some commands the device asked me a Question, for example :
device # copy run tftp
device # Source filename ?
... (3 Replies)
Discussion started by: DarkSoul
3 Replies
6. Shell Programming and Scripting
Hi,
So I started to learn perl a few days ago, and I have some problems...
One of my problems...
#!C:\Perl64\bin\perl.exe -w
use LWP::Simple;
print "Content-Type: Text/Plain\n\n";
sub pagelinks {
return @all = get($_) =~ /href\s*=\s*"?(+)/gis;
}
@a =... (5 Replies)
Discussion started by: byte1918
5 Replies
7. Homework & Coursework Questions
1.) I am to write scripts that will be phasetest folder in the home directory.
2.) The folder should have a set-up,phase and display files
I have written a small script which i used to check for the existing users and their password.
What I need help with:
I have a set of questions in a... (19 Replies)
Discussion started by: moraks007
19 Replies
8. Shell Programming and Scripting
I am new to perl and want to get a little better understanding of debugging code in perl. I have a perl script that has questions to be answered like:
he following PERL modules are recommended:
Crypt::DES
Crypt::PasswdMD5
IO::Pty
Net::Write::Layer2
String::CRC32
Attempt to install... (0 Replies)
Discussion started by: metallica1973
0 Replies
9. Programming
I have reviewed many examples on-line about running another process (either PERL or shell command or a program), but do not find any usefull for my needs way. (Reviewed and not useful the system(), 'back ticks', exec() and open())
I would like to run another PERL-script from first one, not... (1 Reply)
Discussion started by: alex_5161
1 Replies
LEARN ABOUT DEBIAN
test::lectrotest::regressiontesting
Test::LectroTest::RegressionTesting(3pm) User Contributed Perl Documentation Test::LectroTest::RegressionTesting(3pm)
NAME
Test::LectroTest::RegressionTesting - How to do regression testing (for free!)
SYNOPSIS
use Test::LectroTest
regressions => "regressions.txt";
# -- OR --
use Test::LectroTest
playback_failures => "regression_suite_for_my_module.txt",
record_failures => "failures_in_the_field.txt";
# -- OR --
use Test::LectroTest::Compat
regressions => "regressions.txt";
# -- OR --
use Test::LectroTest::Compat
playback_failures => "regression_suite_for_my_module.txt",
record_failures => "failures_in_the_field.txt";
DESCRIPTION
Say that LectroTest uncovers a bug in your software by finding a random test case that proves one of your properties to be false. If you
apply a fix for the bug, how can you be sure that LectroTest will re-test the property using the exact same test case that "broke" it
before, just to be certain the bug really is fixed? And how can you be sure that future changes to your code will not reintroduce the same
bug without your knowing it?
For situations like these, LectroTest can record failure-causing test cases to a file, and it can play those test cases back as part of its
normal testing strategy.
The easiest way to take advantage of this feature is to set the regressions parameter when you "use" Test::LectroTest or
Test::LectroTest::Compat:
use Test::LectroTest
regressions => "regressions.txt";
This tells LectroTest to use the file "regressions.txt" for both recording and playing back failures. If you want to record and play back
from separate files, use the record_failures and playback_failures options:
use Test::LectroTest::Compat
playback_failures => "regression_suite_for_my_module.txt",
record_failures => "failures_in_the_field.txt";
Here is how it works:
1. When testing a property named N, LectroTest will check for a play-back file. If the file exists, LectroTest will search it for test
cases associated with N. If any such test cases exist, LectroTest will play them back before and in addition to performing the usual,
random testing of the property.
2. When performing the usual, random testing of a property named N, if a failure occurs (i.e., LectroTest finds a counterexample),
LectroTest will record the test case that caused the failure to the recording file, associating the test case with the name N.
NOTE: If you pass any of the recording or playback parameters to Test::LectroTest::Compat, you must have version 0.3500 or greater of
Test::LectroTest installed. (Module authors, update your modules' build dependencies accordingly.) The Test::LectroTest module itself,
however, has always ignored unfamiliar parameters, and thus these options are backward compatible with older versions.
SEE ALSO
Test::LectroTest gives a quick overview of automatic, specification-based testing with LectroTest. This module accepts failure recording
and play-back options.
Test::LectroTest::Compat lets you mix LectroTest with the popular family of Test::Builder-based modules such as Test::Simple and
Test::More. This module accepts failure recording and play-back options.
LECTROTEST HOME
The LectroTest home is http://community.moertel.com/LectroTest. There you will find more documentation, presentations, mailing-list
archives, a wiki, and other helpful LectroTest-related resources. It's also the best place to ask questions.
AUTHOR
Tom Moertel (tom@moertel.com)
COPYRIGHT and LICENSE
Copyright (c) 2004-06 by Thomas G Moertel. All rights reserved.
This program is free software; you can redistribute it and/or modify it under the same terms as Perl itself.
perl v5.12.3 2007-08-30 Test::LectroTest::RegressionTesting(3pm)