Sponsored Content
Top Forums Shell Programming and Scripting Creating loop for a script -Perl Post 302314676 by stateperl on Saturday 9th of May 2009 11:02:26 AM
Old 05-09-2009
Awesome Awk

Last edited by stateperl; 05-09-2009 at 12:16 PM..
 

10 More Discussions You Might Find Interesting

1. Shell Programming and Scripting

help needed with creating challenging bash script with creating directories

Hi, Can someone help me with creating a bash shell script. I need to create a script that gets a positive number n as an argument. The script must create n directories in the current directory with names like map_1, map_2 etcetera. Each directory must be contained within its predecessor. So... (7 Replies)
Discussion started by: I-1
7 Replies

2. UNIX for Dummies Questions & Answers

Foreach loop to run a perl script on multiple files

Hi, I have thousands of files in a directory that have the following 2 formats: 289620178.aln 289620179.aln 289620180.aln 289620183.aln 289620184.aln 289620185.aln 289620186.aln 289620187.aln 289620188.aln 289620189.aln 289620190.aln 289620192.aln.... and: alnCDS_1.fasta (1 Reply)
Discussion started by: greptastic
1 Replies

3. Shell Programming and Scripting

while loop in perl script

#! /usr/bin/perl $exp = "y"; while ($exp !="n") { system "clear"; # clear the window print "\nEnter the number of Widgets ordered: "; $widgetcount = <STDIN>; #vairable to save the number of total widgerts ordered chop $widgetcount; print "\nEnter the number of Gidgets ordered:... (2 Replies)
Discussion started by: navjot99cheema
2 Replies

4. Shell Programming and Scripting

Creating a loop in csh

I have the following code and want to use a loop to output the results to the fparams file. if ($optparams == 1) then # Set the tdarwin parameters set txt01 = "Call to raytrac.csh" set txt02 = "" set txt03 = "./Scripts/raytrac.csh $*" set txt04 = "" set txt05 =... (0 Replies)
Discussion started by: kristinu
0 Replies

5. Shell Programming and Scripting

Creating variable by for loop

i have a file 'detail' which contains cat detail 111111 222222 333333 444444 but detail may be 4 line file.6 line file or 8 line file like cat detail 111111 222222 333333 444444 555555 666666 777777 888888 so i want a declare a loop which assign the value of first line in one... (11 Replies)
Discussion started by: rakeshtomar82
11 Replies

6. Shell Programming and Scripting

Need help with perl script with a while loop reading file

Good morning, I appreciate any assistance that I can get from the monks out there. I am able to get this to work for me so that I can do a hostname lookup if I only specify one hostname in the script. What I want to do is have a file with hostnames and do lookups for each name in the file. Here is... (1 Reply)
Discussion started by: brianjb
1 Replies

7. Shell Programming and Scripting

Splitting a file and creating new files using Perl script

Hi All, I am new to Scripting language. I want to split a file and create several subfiles using Perl script. Example : File format : Sourcename ID Date Nbr SU IMYFDJ 9/17/2012 5552159976555 SU BWZMIG 9/14/2012 1952257857887 AR PEHQDF 11/26/2012 ... (13 Replies)
Discussion started by: Deepak9870
13 Replies

8. Shell Programming and Scripting

Calling an interactive perl script from within a while-read loop

Hi, I have a perl script that prompts for a user to enter a password before doing what it does. This works well if I call it directly from a bash script #!/bin/bash /path/to/perl/script $arg1 $arg2 But, when I try to enclose this within a while read loop, the perl script is called but... (1 Reply)
Discussion started by: prafulnama
1 Replies

9. Programming

Perl: restrict perl from automaticaly creating a hash branches on check

My issue is that the perl script (as I have done it so far) created empty branches when I try to check some branches on existence. I am using multydimentional hashes: found it as the best way for information that I need to handle. Saing multidimentional I means hash of hashes ... So, I have ... (2 Replies)
Discussion started by: alex_5161
2 Replies

10. Shell Programming and Scripting

PERL script loop problem

I have written the below PERL script to reprocess messages from a failure queue. It basically browses all the messages in the failure queue to individual files in a directory and then scans those files to determine the originating queue. The script will then move each message in turn from the... (0 Replies)
Discussion started by: chris01010
0 Replies
Dist::Zilla::Plugin::MakeMaker::Custom(3pm)		User Contributed Perl Documentation	       Dist::Zilla::Plugin::MakeMaker::Custom(3pm)

NAME
Dist::Zilla::Plugin::MakeMaker::Custom - Allow a dist to have a custom Makefile.PL VERSION
This document describes version 4.08 of Dist::Zilla::Plugin::MakeMaker::Custom, released June 4, 2012 as part of Dist-Zilla-Plugins-CJM version 4.09. SYNOPSIS
In dist.ini: [MakeMaker::Custom] eumm_version = 0.34 ; the default comes from the MakeMaker plugin In your Makefile.PL: use ExtUtils::MakeMaker; ##{ $share_dir_code{preamble} || '' ##} WriteMakefile( NAME => "My::Module", ##{ $plugin->get_prereqs ##} ); ##{ $share_dir_code{postamble} || '' ##} Of course, your Makefile.PL should be more complex than that, or you don't need this plugin. DESCRIPTION
This plugin is for people who need something more complex than the auto-generated Makefile.PL or Build.PL generated by the MakeMaker or ModuleBuild plugins. It is a subclass of the MakeMaker plugin, but it does not write a Makefile.PL for you. Instead, you write your own Makefile.PL, which may do anything ExtUtils::MakeMaker is capable of. This plugin will process Makefile.PL as a template (using Text::Template), which allows you to add data from Dist::Zilla to the version you distribute (if you want). The template delimiters are "##{" and "##}", because that makes them look like comments. That makes it easier to have a Makefile.PL that works both before and after it is processed as a template. This is particularly useful for XS-based modules, because it can allow you to build and test the module without the overhead of "dzil build" after every small change. The template may use the following variables: %default_args The hash of arguments for WriteMakefile generated by the normal MakeMaker plugin. $dist The name of the distribution. $eumm_version The minimum version of ExtUtils::MakeMaker required (from the "eumm_version" attribute of this plugin). %meta The hash of metadata (in META 2 format) that will be stored in META.json. $perl_prereq The minimum version of Perl required (from the prerequisites in the metadata). May be "undef". Equivalent to $default_args{MIN_PERL_VERSION}. $plugin The MakeMaker::Custom object that is processing the template. %share_dir_code A hash of strings containing the code for loading "File::ShareDir::Install" (if it's used by this dist). Put "##{ $share_dir_code{preamble} || '' ##}" after the "use ExtUtils::MakeMaker" line, and put "##{ $share_dir_code{postamble} || '' ##}" after the "WriteMakefile" call. (You can omit the "|| ''" if you're sure the dist is using File::ShareDir. For backwards compatibility, this code is also available in the array @share_dir_block, but you should update your templates to use %share_dir_code instead. $version The distribution's version number. $zilla The Dist::Zilla object that is creating the distribution. METHODS
get_default $plugin->get_default(qw(key1 key2 ...)) A template can call this method to extract the specified key(s) from the default WriteMakefile arguments created by the normal MakeMaker plugin and have them formatted into a comma-separated list suitable for a hash constructor or a function's parameter list. If any key has no value (or its value is an empty hash or array ref) it will be omitted from the list. If all keys are omitted, the empty string is returned. Otherwise, the result always ends with a comma. get_prereqs $plugin->get_prereqs This is equivalent to $plugin->get_default(qw(BUILD_REQUIRES CONFIGURE_REQUIRES PREREQ_PM)) In other words, it returns all the keys that describe the distribution's prerequisites. SEE ALSO
The ModuleBuild::Custom plugin does basically the same thing as this plugin, but for Build.PL (if you prefer Module::Build). The MakeMaker::Awesome plugin allows you to do similar things to your Makefile.PL, but it works in a very different way. With MakeMaker::Awesome, you subclass the plugin and override the methods that generate Makefile.PL. In my opinion, MakeMaker::Awesome has two disadvantages: it's unnecessarily complex, and it doesn't allow you to build your module without doing "dzil build". The only advantage of MakeMaker::Awesome that I can see is that if you had several dists with very similar Makefile.PLs, you could write one subclass of MakeMaker::Awesome and use it in each dist. DEPENDENCIES
MakeMaker::Custom requires Dist::Zilla (4.300009 or later) and Text::Template. I also recommend applying Template_strict.patch to Text::Template. This will add support for the STRICT option, which will help catch errors in your templates. INCOMPATIBILITIES
You must not use this in conjunction with the MakeMaker or MakeMaker::Awesome plugins. BUGS AND LIMITATIONS
No bugs have been reported. AUTHOR
Christopher J. Madsen "<perl AT cjmweb.net>" Please report any bugs or feature requests to "<bug-Dist-Zilla-Plugins-CJM AT rt.cpan.org>" or through the web interface at http://rt.cpan.org/Public/Bug/Report.html?Queue=Dist-Zilla-Plugins-CJM <http://rt.cpan.org/Public/Bug/Report.html?Queue=Dist-Zilla-Plugins- CJM>. You can follow or contribute to Dist-Zilla-Plugins-CJM's development at http://github.com/madsen/dist-zilla-plugins-cjm <http://github.com/madsen/dist-zilla-plugins-cjm>. COPYRIGHT AND LICENSE
This software is copyright (c) 2012 by Christopher J. Madsen. This is free software; you can redistribute it and/or modify it under the same terms as the Perl 5 programming language system itself. DISCLAIMER OF WARRANTY
BECAUSE THIS SOFTWARE IS LICENSED FREE OF CHARGE, THERE IS NO WARRANTY FOR THE SOFTWARE, TO THE EXTENT PERMITTED BY APPLICABLE LAW. EXCEPT WHEN OTHERWISE STATED IN WRITING THE COPYRIGHT HOLDERS AND/OR OTHER PARTIES PROVIDE THE SOFTWARE "AS IS" WITHOUT WARRANTY OF ANY KIND, EITHER EXPRESSED OR IMPLIED, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE. THE ENTIRE RISK AS TO THE QUALITY AND PERFORMANCE OF THE SOFTWARE IS WITH YOU. SHOULD THE SOFTWARE PROVE DEFECTIVE, YOU ASSUME THE COST OF ALL NECESSARY SERVICING, REPAIR, OR CORRECTION. IN NO EVENT UNLESS REQUIRED BY APPLICABLE LAW OR AGREED TO IN WRITING WILL ANY COPYRIGHT HOLDER, OR ANY OTHER PARTY WHO MAY MODIFY AND/OR REDISTRIBUTE THE SOFTWARE AS PERMITTED BY THE ABOVE LICENSE, BE LIABLE TO YOU FOR DAMAGES, INCLUDING ANY GENERAL, SPECIAL, INCIDENTAL, OR CONSEQUENTIAL DAMAGES ARISING OUT OF THE USE OR INABILITY TO USE THE SOFTWARE (INCLUDING BUT NOT LIMITED TO LOSS OF DATA OR DATA BEING RENDERED INACCURATE OR LOSSES SUSTAINED BY YOU OR THIRD PARTIES OR A FAILURE OF THE SOFTWARE TO OPERATE WITH ANY OTHER SOFTWARE), EVEN IF SUCH HOLDER OR OTHER PARTY HAS BEEN ADVISED OF THE POSSIBILITY OF SUCH DAMAGES. perl v5.14.2 2012-06-04 Dist::Zilla::Plugin::MakeMaker::Custom(3pm)
All times are GMT -4. The time now is 05:44 AM.
Unix & Linux Forums Content Copyright 1993-2022. All Rights Reserved.
Privacy Policy