Sponsored Content
Top Forums Shell Programming and Scripting How to write Perl Script to Get MQ Queue Depth? Post 302931438 by srkmish on Tuesday 13th of January 2015 07:03:15 AM
Old 01-13-2015
Im sorry but I have little idea about perl modules.

Im assuming that we have to check for MQseries.pm module and get its path. How do I know whether it exists and how to find the path?
 

10 More Discussions You Might Find Interesting

1. Shell Programming and Scripting

mq queue depth

hi how to find the queue depth of MQ Queue using unix please its very urgent (0 Replies)
Discussion started by: Satyak
0 Replies

2. Shell Programming and Scripting

Need help to write a Perl script

Hello friends, I am having a awk script which does my goal , but I want to learn perl , after learning the basics in perl now I am trying to convert my nawk script to perl . Please help me to do some task in perl that I ve already did in nawk. Like I am facing some problem in... (10 Replies)
Discussion started by: user_prady
10 Replies

3. UNIX for Dummies Questions & Answers

Should I write a PERL Script or Shell Script?

Hello, I have done some BASIC shell scripting/PERL scripting before so I am familiar with the languages. I am not really sure which one would lend itself better to the application I have to write. I am required to scan the message logs for possible break in attempts. If I use shell scripting... (2 Replies)
Discussion started by: mojoman
2 Replies

4. Shell Programming and Scripting

perl script to find, write, repeat...

I am a novice writing perl scripts so I'd appreciate any help you guys can offer. I have a list of 100 words in a file (words.txt) and I need to find them in a second file (data.txt). Whenever one of these words is found I need to write that line to a third file (out.txt) and then continue... (1 Reply)
Discussion started by: tgamble
1 Replies

5. Shell Programming and Scripting

perl script to check read/write/execute permission for 'others'

I want to check access rights permissions not for 'user', not for 'group', but for 'others'. I want to do it by system command in which i want to use 'ls -l' and 'awk' command. I have written the following program : #!/usr/bin/local/perl #include <stdlib.h> system ("ls -l | awk... (1 Reply)
Discussion started by: shubhamsachdeva
1 Replies

6. Shell Programming and Scripting

How to write a update query in perl script?

can any one suggest me on how to write a update query in perl script for Oracle database and also tell me abt how we can write a code for sending mails with report as attachment to appropriate persons? (1 Reply)
Discussion started by: Ramesh V Kumar
1 Replies

7. Shell Programming and Scripting

Need a perl script to read and write the data

Hi, I have on Designdocument in that information is stored with in tabular format.I need Perlscript to read and write the datausing perl script? Regards, Ravi (0 Replies)
Discussion started by: toravi.pentaho
0 Replies

8. Shell Programming and Scripting

Need a UNIX/perl script to read and write the data

Hi, I have on Designdocument in that information is stored with in tabular format.I need Perl/unix script to read and write the data using perl script? Regards, Ravi (4 Replies)
Discussion started by: toravi.pentaho
4 Replies

9. Shell Programming and Scripting

Perl script to create/write into spreadsheet

Hi, I need help in debug following script. can somebody help....!!! #!/usr/bin/perl -w use strict; use Spreadsheet::WriteExcel; # Create a new workbook called simple.xls and add a worksheet. my $workbook = Spreadsheet::WriteExcel->new('simple.xls'); my $worksheet =... (1 Reply)
Discussion started by: chettyravi
1 Replies

10. Shell Programming and Scripting

MQ Queue depth.

Hi All, We have SuoOs and Linux servers. May i know how do we find the queue depth of IBM MQ from server. (2 Replies)
Discussion started by: Girish19
2 Replies
Module::Util(3pm)					User Contributed Perl Documentation					 Module::Util(3pm)

NAME
Module::Util - Module name tools and transformations SYNOPSIS
use Module::Util qw( :all ); $valid = is_valid_module_name $potential_module; $relative_path = module_path $module_name; $file_system_path = module_fs_path $module_name; # load module at runtime require module_path $module_name; # (see perldoc -f require for limitations of this approach.) DESCRIPTION
This module provides a few useful functions for manipulating module names. Its main aim is to centralise some of the functions commonly used by modules that manipulate other modules in some way, like converting module names to relative paths. EXPORTS
Nothing by default. Use the tag :all to import all functions. FUNCTIONS
is_valid_module_name $bool = is_valid_module_name($module) Returns true if $module looks like a module name, false otherwise. module_is_loaded $abs_path_or_hook = module_is_loaded($module) Returns the %INC entry for the given module. This is usually the absolute path of the module, but sometimes it is the hook object that loaded it. See perldoc -f require Equivalent to: $INC{module_path($module)}; Except that invalid module names simply return false without generating warnings. find_installed $path = find_installed($module, [@inc]) Returns the first found installed location of the given module. This is always an absolute filesystem path, even if it is derived from a relative path in the include list. By default, @INC is searched, but this can be overridden by providing extra arguments. # look in @INC $path = find_installed("Module::Util") # look only in lib and blib/lib, not in @INC $path = find_installed("Module::Util", 'lib', 'blib/lib') Note that this will ignore any references in the search path, so it doesn't necessarily follow that the module cannot be successfully "require"d if this returns nothing. all_installed @paths = all_installed($module, [@inc]) Like find_installed, but will return multiple results if the module is installed in multiple locations. find_in_namespace @modules = find_in_namespace($namespace, [ @inc ]) Searches for modules under a given namespace in the search path (@INC by default). find_in_namespace("My::Namespace"); Returns unique installed module names under the namespace. Note that this does not include the passed-in name, even if it is the name of an installed module. Use of an empty string as the namespace returns all modules in @inc. module_path $path = module_path($module) Returns a relative path in the form used in %INC. Which I am led to believe is always a unix file path, regardless of the platform. If the argument is not a valid module name, nothing is returned. module_fs_path $path = module_fs_path($module) Like module_path, but returns the path in the native filesystem format. On unix systems, this should be identical to module_path. path_to_module $module = path_to_module($path) Transforms a relative unix file path into a module name. # Print loaded modules as module names instead of paths: print join(" ", map { path_to_module($_) } keys %INC Returns undef if the resulting module name is not valid. fs_path_to_module $module = fs_path_to_module($fs_path) Transforms relative filesystem paths into module names. # on windows: fs_path_to_module("Module\Util.pm") # returns Module::Util Returns undef if the resulting module is not valid. module_path_parts @parts = module_path_parts($module_name) Returns the module name split into parts suitable for feeding to File::Spec->catfile. module_path_parts('Module::Util') # returns ('Module', 'Util.pm') If the module name is invalid, nothing is returned. canonical_module_name $module = canonical_module_name($module); Returns the canonical module name for the given module. This basically consists of eliminating any apostrophe symbols and replacing them with '::'. canonical_module_name("Acme::Don't"); # Acme::Don::t Returns undef if the name is not valid. BUGS
None known. Please report any found. SEE ALSO
pm_which, a command-line utility for finding installed perl modules that is bundled with this module. Other, similar CPAN modules: Class::Inspector, Module::Info, Module::Require, UNIVERSAL::require, Module::Runtime perldoc -f require AUTHOR
Matt Lawrence <mattlaw@cpan.org> THANKS
Alexander Kuehne and Adrian Lai for submitting patches. COPYRIGHT
Copyright 2005 Matt Lawrence, 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.14.2 2012-06-08 Module::Util(3pm)
All times are GMT -4. The time now is 12:52 AM.
Unix & Linux Forums Content Copyright 1993-2022. All Rights Reserved.
Privacy Policy