well all DNS components for perl was not installed so it didnt work with dnswalk. however I asked a workingmate and he wrote a script in a few minutes...
//nicke
Can any one please let me know below ones
1) How to Perform the Port Scan in Solaris Environment and how to block the unwanted Ports.
2) How to know whether particular Port is listning the requests or not?
Thanks
Ramkumar.B (7 Replies)
Hi,
I am new to unix.
I have a file with records like the below
ads-sap-4.txt: </a></b></span><span class="linkbutton yellow_but"><a id="2005754_more" style="cursor:pointer; cursor:hand;"... (3 Replies)
Hi
I am new to this forum, and glad to be a part of it here after. I have an intersting issue for which I need suggestions of you great minds.
I am in process a building a shell script which should scan a directory for a specified amount of time and prepare a list of all the files that were... (1 Reply)
i have a script to look for a file, but it moves a file that's being used.
i want to use:
if file exists > 0, and not being updated/used in the last 2 minutes, move to /tmp
i can do this much:
if
then
mv filename.txt /tmp
else
exit
fi
or how can i check if... (3 Replies)
The script should
_scan a specific directory
_If a file name is like one provided, then run the command to send the file via CFT
The name should be picked from a list. The current list is :
... (11 Replies)
Dear Gurus,
Can any one advice about the normal limits for the Page scanning rates on the AIX platforms, i am having enormous values for the scan rate along the hour it may reache 3000 pages/sec.
Regards, Negm (2 Replies)
Hello all
I want to help
I have some compressed files on the system
When you want to unzip these files
Delete any file which symlink
"ln -s"
{{
I need script is necessary
Script contain:
Any operation to decompress the system is doing to delete any symlink... (0 Replies)
In Solaris the administrator has to update /kernel/drv/sd.conf file to tell the sd driver to scan for a broader range of scsi devices.
Can someone please tell me what file needs to be update in Redhat Linux 5 for the same.
Second part of the question is WWN for HBA's can be found (atleast in my... (1 Reply)
i want to scan all open and closed ports on a server. how can i do this.
i intend on using nmap, but if there are better ways to do it, please let me know.
i understand there are a total of 6335 allowable ports on a server.
so out of that 6335, i want to know which is open or closed. id... (1 Reply)
Discussion started by: SkySmart
1 Replies
LEARN ABOUT DEBIAN
coro::util
Util(3pm) User Contributed Perl Documentation Util(3pm)NAME
Coro::Util - various utility functions.
SYNOPSIS
use Coro::Util;
DESCRIPTION
This module implements various utility functions, mostly replacing perl functions by non-blocking counterparts.
Many of these functions exist for the sole purpose of emulating existing interfaces, no matter how bad or limited they are (e.g. no IPv6
support).
This module is an AnyEvent user. Refer to the AnyEvent documentation to see how to integrate it into your own programs.
$ipn = Coro::Util::inet_aton $hostname || $ip
Works almost exactly like its "Socket::inet_aton" counterpart, except that it does not block other coroutines.
Does not handle multihomed hosts or IPv6 - consider using "AnyEvent::Socket::resolve_sockaddr" with the Coro rouse functions instead.
gethostbyname, gethostbyaddr
Work similarly to their Perl counterparts, but do not block. Uses "AnyEvent::Util::inet_aton" internally.
Does not handle multihomed hosts or IPv6 - consider using "AnyEvent::Socket::resolve_sockaddr" or "AnyEvent::DNS::reverse_lookup" with
the Coro rouse functions instead.
@result = Coro::Util::fork_eval { ... }, @args
Executes the given code block or code reference with the given arguments in a separate process, returning the results. The return
values must be serialisable with Coro::Storable. It may, of course, block.
Note that using event handling in the sub is not usually a good idea as you will inherit a mixed set of watchers from the parent.
Exceptions will be correctly forwarded to the caller.
This function is useful for pushing cpu-intensive computations into a different process, for example to take advantage of multiple
CPU's. Its also useful if you want to simply run some blocking functions (such as "system()") and do not care about the overhead enough
to code your own pid watcher etc.
This function might keep a pool of processes in some future version, as fork can be rather slow in large processes.
You should also look at "AnyEvent::Util::fork_eval", which is newer and more compatible to totally broken Perl implementations such as
the one from ActiveState.
Example: execute some external program (convert image to rgba raw form) and add a long computation (extract the alpha channel) in a
separate process, making sure that never more then $NUMCPUS processes are being run.
my $cpulock = new Coro::Semaphore $NUMCPUS;
sub do_it {
my ($path) = @_;
my $guard = $cpulock->guard;
Coro::Util::fork_eval {
open my $fh, "convert -depth 8 Q$pathE rgba:"
or die "$path: $!";
local $/;
# make my eyes hurt
pack "C*", unpack "(xxxC)*", <$fh>
}
}
my $alphachannel = do_it "/tmp/img.png";
AUTHOR
Marc Lehmann <schmorp@schmorp.de>
http://home.schmorp.de/
perl v5.14.2 2012-04-13 Util(3pm)