7 More Discussions You Might Find Interesting
1. Solaris
Hi Guys,
Have you tried running Solaris 10 on Failsafe mode? What are their advantages and disadvantages?
What would you recommend for a roll-back plan in case something happens after failsafe mode?
I need to run on failsafe mode to be able to execute fsck.
Appreciate your kind... (1 Reply)
Discussion started by: bocha
1 Replies
2. IP Networking
Hi,
Please help me on issue described below,
I have 4 machine setup, M1 -> M2 -> M3 | M4. And A laptop that can be reachable through both M3 and M4.
M2 has 2 NIC conected to M3 and M4. Now I want to divide the flow coming from M1 for laptop.
At M2, I have done following,... (1 Reply)
Discussion started by: rahulbhansali24
1 Replies
3. Shell Programming and Scripting
Hi,
Greetings.
We need to make a regexp based rule engine.
The rules would be applied to any file specified and the data not matching should be logged.
Would awk be the right scripting language.
Regards,
Dikesh Shah. (2 Replies)
Discussion started by: dikesm
2 Replies
4. Shell Programming and Scripting
Hi guys,
i have a file in below format.let me explain first what i am trying to do .
i am making a file from this file , will rearrange these columns, then i will run several command(start/stop mentioned in this file) on unix environment. my requirements :
1. i have 27 servers , on each server... (4 Replies)
Discussion started by: deepakiniimt
4 Replies
5. Fedora
Hello. I own a MacBook (black) running Leopard (Mac OS X 10.5.8), and I'm curious about a few things -- any help will be very, very much appreciated. I'm pretty much a newbie to Unix, although I have some very basic command-line skills with Mac OS X's Terminal. So while I know how to work the... (13 Replies)
Discussion started by: Tron55555
13 Replies
6. Shell Programming and Scripting
Hi
Anyone can compare and contrast differences, Advantages & Disadvantages between BASH vs PERL
just a need few points on both
Thanks (4 Replies)
Discussion started by: karthikn7974
4 Replies
7. Shell Programming and Scripting
Hi,
I've been trying to create a perl file to run something very specific. But I'm not getting any success. I'm not very good with hashing.
I have a file with two columns (tab separated) (already sorted)
99890 +
100281 +
104919 -
109672 +
113428 -
114501 +
115357 +
115598 ... (7 Replies)
Discussion started by: labrazil
7 Replies
File::Find::Object::Rule::Extending(3pm) User Contributed Perl Documentation File::Find::Object::Rule::Extending(3pm)
NAME
File::Find::Object::Rule::Extending - the mini-guide to extending File::Find::Object::Rule
SYNOPSIS
package File::Find::Object::Rule::Random;
use strict;
use warnings;
# take useful things from File::Find::Object::Rule
use base 'File::Find::Object::Rule';
# and force our crack into the main namespace
sub File::Find::Object::Rule::random () {
my $self = shift()->_force_object;
$self->exec( sub { rand > 0.5 } );
}
1;
DESCRIPTION
File::Find::Object::Rule inherits File::Find::Rule's extensibility. It is now possibile to extend it, using the following conventions.
Declare your package
package File::Find::Object::Rule::Random;
use strict;
use warnings;
Inherit methods from File::Find::Object::Rule
# take useful things from File::Find::Object::Rule
use base 'File::Find::Object::Rule';
Force your madness into the main package
# and force our crack into the main namespace
sub File::Find::Object::Rule::random () {
my $self = shift()->_force_object;
$self->exec( sub { rand > 0.5 } );
}
Yes, we're being very cavalier here and defining things into the main File::Find::Object::Rule namespace. This is due to lack of
imaginiation on my part - I simply can't find a way for the functional and oo interface to work without doing this or some kind of
inheritance, and inheritance stops you using two File::Find::Object::Rule::Foo modules together.
For this reason try and pick distinct names for your extensions. If this becomes a problem then I may institute a semi-official registry
of taken names.
Taking no arguments.
Note the null prototype on random. This is a cheat for the procedural interface to know that your sub takes no arguments, and so allows
this to happen:
find( random => in => '.' );
If you hadn't declared "random" with a null prototype it would have consumed "in" as a parameter to it, then got all confused as it doesn't
know about a '.' rule.
NOTES ABOUT THE CALLBACK
The callback can access the File::Find::Object::Result using "$self->finder->item_obj()".
AUTHOR
Richard Clamp <richardc@unixbeard.net>
COPYRIGHT
Copyright (C) 2002 Richard Clamp. All Rights Reserved.
This module is free software; you can redistribute it and/or modify it under the same terms as Perl itself.
SEE ALSO
File::Find::Object::Rule
File::Find::::Rule::MMagic was the first extension module for File::Find::Rule, so maybe check that out.
perl v5.14.2 2012-05-05 File::Find::Object::Rule::Extending(3pm)
