Login or Register to Ask a Question and Join Our Community

Sponsored Content
Full Discussion: Passing arguments to a perl script
Top Forums Shell Programming and Scripting Passing arguments to a perl script Post 302771528 by balajesuri on Thursday 21st of February 2013 01:07:31 AM
Old 02-21-2013
The crude way:
Code:
#! /usr/bin/perl -w
use strict;

if ( @ARGV != 2 ) {
    print "Invalid number of arguments.\n";
    exit;
}

my @elements = ();
if ( $ARGV[0] eq "-d" ) {
    @elements = split /,/, $ARGV[1];
    print "Arguments are: @elements\n";
}
else {
    print "Invalid switch. Please try again.\n";
}

You may also take a look at Getopt::Std for a neater implementation.
 

10 More Discussions You Might Find Interesting

1. Shell Programming and Scripting

Passing arguments to a script

I've written a script (bgrep) for a more advanced grep command (& attached a cut down version below). I'm trying allow all grep options to be used, or in any combination. The script works fine if I type say bgrep -i -files product it will return a non-case sensitive list of matches for... (3 Replies)
Discussion started by: Kevin Pryke
3 Replies

2. Shell Programming and Scripting

Passing arguments to a Perl script

I am playing around with Perl and wrote the script below that is executed from the command line, it will split data up in a file based on a value supplied. When executed you provide two arguments - the file that contains the data to be split and the character you want to split by. It works as... (4 Replies)
Discussion started by: jyoung
4 Replies

3. UNIX for Advanced & Expert Users

Passing blank arguments to a script

All, I have a cron job script that receives several command line arguments. At some point if there are validation problems and the job cannot be run, it duplicates the entire command line into a temporary text file which is later executed as a script. Unfortunately when I pass the list of received... (7 Replies)
Discussion started by: rm-r
7 Replies

4. Shell Programming and Scripting

problem passing arguments to script

Hi, I am writing a script, which is invoked from other system using ssh. I have problems reading the arguments passing to the script. If the argument has a space in it (ex "rev 2.00"), the script considers "rev" as 1 argument and "2.00" as another. Instead i want "rev 2.00" to be considered... (5 Replies)
Discussion started by: cjjoy
5 Replies

5. Shell Programming and Scripting

Passing arguments to Perl Function

Hi All, I am trying to pass an argument called "Pricelist" to a Perl function, then the function will open and print out the contents of the file named "Pricelist". But i can't seem to do it using my below code. Can any expert give some advice? #!/usr/local/bin/perl $DATABASE =... (1 Reply)
Discussion started by: Raynon
1 Replies

6. Shell Programming and Scripting

passing arguments to sql script

Hi Gurus, i have one requirement in unix script, i have a file called abc.txt in that few lines are there with the empid, i need to read each line and pass to .sql script. ex: abc.txt 2345 2346 1243 1234 i need to pass these arguments to .sql script rom unix ex: select * from... (1 Reply)
Discussion started by: Devendar
1 Replies

7. Shell Programming and Scripting

passing arguments to external script

Hi! I have a python script that requires arguments and these arguments are file paths. This script works fine when executed like this: /my_python_script "file_path1" "file_path2" (i added quotes as some file names may have weird characters) the issue happens when i launch my python script... (14 Replies)
Discussion started by: gigagigosu
14 Replies

8. Shell Programming and Scripting

Problems passing shell arguments to perl

Semi-newbie, so flame throwers to 'singe-only', please. ;-) I have a large number of (say) .html files, where I'd like to do a recursive in-place search and replace a particular string. The following bit of perl works fine: perl -pi -e 's/oldstring/newstring/g' `find ./ -name *.html` ... (2 Replies)
Discussion started by: johnny_canucl
2 Replies

9. Shell Programming and Scripting

Passing arguments to a bash script

Hi, I wanted to pass an argument to a bash script. So that the argument is used inside the awk command inside the bash script. I know the noraml way of passing argument to a bash script as below : sh myScript.sh abc Inside the bash script i can use like this myArg1=$1 wc $myArg But... (8 Replies)
Discussion started by: shree11
8 Replies

10. Shell Programming and Scripting

Passing arguments while running the script

Hi, I have a requirement for creating a MQ (queue) where the inputs has to be passed as arguments. Running the script as below ./hi.sh "Servername" "QueueManagername" "QueuecreationCommand" cat hi.sh echo "Welcome to $1" runmqsc $2 < $3 But the queue creation command is... (9 Replies)
Discussion started by: Anusha M
9 Replies

LEARN ABOUT DEBIAN

moosex::getopt::processedargv

MooseX::Getopt::ProcessedArgv(3pm)			User Contributed Perl Documentation			MooseX::Getopt::ProcessedArgv(3pm)

NAME

       MooseX::Getopt::ProcessedArgv - MooseX::Getopt::ProcessedArgv - Class containing the results of process_argv

SYNOPSIS

	 use My::App;

	 my $pa = My::App->process_argv(@params);
	 my $argv_copy		= $pa->argv_copy();
	 my $extra_argv 	= $pa->extra_argv();
	 my $usage		= $pa->usage();
	 my $constructor_params = $pa->constructor_params();
	 my $cli_params 	= $pa->cli_params();

DESCRIPTION

       This object contains the result of a "process_argv" in MooseX::Getopt call. It contains all the information that "new_with_options" in
       MooseX::Getopt uses when calling new.

METHODS

   argv_copy
       Reference to a copy of the original @ARGV array as it originally existed at the time of "new_with_options".

   extra_arg
       Arrayref of leftover @ARGV elements that Getopt::Long did not parse.

   usage
       Contains the Getopt::Long::Descriptive::Usage object (if Getopt::Long::Descriptive is used).

   constructor_params
       Parameters passed to process_argv.

   cli_param
       Command-line parameters parsed out of @ARGV.

AUTHORS

       o   Stevan Little <stevan@iinteractive.com>

       o   Brandon L. Black <blblack@gmail.com>

       o   Yuval Kogman <nothingmuch@woobling.org>

       o   Ryan D Johnson <ryan@innerfence.com>

       o   Drew Taylor <drew@drewtaylor.com>

       o   Tomas Doran <bobtfish@bobtfish.net>

       o   Florian Ragwitz <rafl@debian.org>

       o   Dagfinn Ilmari Mannsaker <ilmari@ilmari.org>

       o   AEvar Arnfjoro Bjarmason <avar@cpan.org>

       o   Chris Prather <perigrin@cpan.org>

       o   Karen Etheridge <ether@cpan.org>

       o   Jonathan Swartz <swartz@pobox.com>

COPYRIGHT AND LICENSE

       This software is copyright (c) 2012 by Infinity Interactive, Inc.

       This is free software; you can redistribute it and/or modify it under the same terms as the Perl 5 programming language system itself.

perl v5.14.2							    2012-05-13					MooseX::Getopt::ProcessedArgv(3pm)
All times are GMT -4. The time now is 08:00 PM.
Unix & Linux Forums Content Copyright 1993-2022. All Rights Reserved.
Privacy Policy