Login or Register to Ask a Question and Join Our Community

Sponsored Content
Full Discussion: Perl Getopt::Long question - stopping multiple args
Top Forums Shell Programming and Scripting Perl Getopt::Long question - stopping multiple args Post 302395998 by pludi on Wednesday 17th of February 2010 12:02:25 PM
Old 02-17-2010
Ah, you mean like the example a few paragraphs down in the documentation?
Code:
#!/bin/perl
use strict;
use Getopt::Long;

my $firstname = "";
my @surname   = ();
my $help      = "";

GetOptions(
    "firstname=s"   => \$firstname,
    "surname=s{1,}" => \@surname,
    "help!"         => \$help,

) or die "Incorrect usage.\n";

if ($help) {
    print "Common on, it's really not that hard.\n";
}
else {

    print "firstname is set to  - $firstname\n";
    print "surname is set to  - @surname\n";

}

Code:
$ perl getopt.pl --firstname John --surname Smith Jones
firstname is set to  - John
surname is set to  - Smith Jones

 

10 More Discussions You Might Find Interesting

1. Programming

question about getopt()

I'm using getopt() to get command line options.One the optons accepts and argument.The argument is and offset.I was wondering how can I scecify that it's argument is of the type off_t.I've something like this "offset=(off_t)optarg" and it don't work. (1 Reply)
Discussion started by: angelfly
1 Replies

2. AIX

Stopping multiple process on AIX

I'm trying to update a shared library (*.so) in our AIX machine. However, when I tried to delete the old *.so file, I get this error -> Cannot open or remove a file containing a running program. Based on the information I gather from the net, shared libraries are not unloaded (the file remains... (3 Replies)
Discussion started by: soulfactory2002
3 Replies

3. Shell Programming and Scripting

getopt in perl

Hi, I have a perl script with two functions say func a and func b. sub a { ----------- --------- } sub b { --------- --------- } I want to use this function on command line as we can do in shell script using getopt. My motto here is to run the script like this ... (7 Replies)
Discussion started by: namishtiwari
7 Replies

4. Shell Programming and Scripting

using getopt for both short and long options

Hi , I am using getopt for both short and long options as below SHORTOPTS="a:c" LONGOPTS="alpha:,charlie" OPTS=$(getopt -o $SHORTOPTS --longoptions $LONGOPTS -n "$progname" -- "$@") eval set -- "$OPTS" while ; do case $1 in -a|--alpha) echo "-a or --alpha... (0 Replies)
Discussion started by: padmisri
0 Replies

5. Shell Programming and Scripting

using getopt for both short and long options

Hi , I am using getopt for both short and long options as below SHORTOPTS="a:c" LONGOPTS="alpha:,charlie" OPTS=$(getopt -o $SHORTOPTS --longoptions $LONGOPTS -n "$progname" -- "$@") eval set -- "$OPTS" while ; do case $1 in -a|--alpha) echo "-a or --alpha... (1 Reply)
Discussion started by: padmisri
1 Replies

6. Shell Programming and Scripting

using getopt for both short and long options

Hi , I am using getopt for both short and long options as below SHORTOPTS="a:c" LONGOPTS="alpha:,charlie" OPTS=$(getopt -o $SHORTOPTS --longoptions $LONGOPTS -n "$progname" -- "$@") eval set -- "$OPTS" while ; do case $1 in -a|--alpha) echo "-a or --alpha... (1 Reply)
Discussion started by: padmisri
1 Replies

7. Programming

Perl Getopt::Long

Hi All I am using Getopt::Long in perl and i am trying to have it so if i dont supply a switch after the progname is will do a defult option i have the following GetOptions($OPT, 'debug|d', 'mail|m', ) or info(); i want it run the debug if it is not given a switch ... (1 Reply)
Discussion started by: ab52
1 Replies

8. Shell Programming and Scripting

Perl :: Getopt::Long in the program

While going through some of the perl script... I had found the below line.. use Getopt::Long; my $GetOptionsReturnCode = GetOptions ( '<>' => sub { push(@unknownArg, @_); }, 'h|help' => sub { &helpMessage(); exit 0; }, ); Could anyone please explain the above one ... (1 Reply)
Discussion started by: scriptscript
1 Replies

9. Shell Programming and Scripting

Store args passed in array but not the first 2 args

Store args passed in array but not the first 2 args. # bash declare -a arr=("$@") s=$(IFS=, eval 'echo "${arr}"') echo "$s" output: sh array.sh 1 2 3 4 5 6 1,2,3,4,5,6 Desired output: sh array.sh 1 2 3 4 5 6 3,4,5,6 (2 Replies)
Discussion started by: iaav
2 Replies

10. UNIX for Beginners Questions & Answers

Question about getopts optional argument [args...]

There are many places where I can see the syntax description for optargs, which, usually boils down to this: getopts OPTSTRING VARNAME where: OPTSTRING tells getopts which options to expect and where to expect arguments VARNAME tells getopts which shell-variable to use for option reporting... (2 Replies)
Discussion started by: sharkura
2 Replies

LEARN ABOUT DEBIAN

net::dri::data::contact::opensrs

Net::DRI::Data::Contact::OpenSRS(3pm)			User Contributed Perl Documentation		     Net::DRI::Data::Contact::OpenSRS(3pm)

NAME

       Net::DRI::Data::Contact::OpenSRS - Handle OpenSRS contact data for Net::DRI

DESCRIPTION

       This subclass of Net::DRI::Data::Contact adds accessors and validation for OpenSRS specific data.

METHODS

       The following accessors/mutators can be called in chain, as they all return the object itself.

   firstname()
       Please note that for OpenSRS data, the name() must be only the lastname, hence this extra firstname() method

   lastname()
       Alias for name()

SUPPORT

       For now, support questions should be sent to:

       <netdri@dotandco.com>

       Please also see the SUPPORT file in the distribution.

SEE ALSO

       http://www.dotandco.com/services/software/Net-DRI/

AUTHOR

       Richard Siddall, <netdri@elirion.net<gt>

COPYRIGHT

       Copyright (c) 2009 Richard Siddall <netdri@elirion.net>.  All rights reserved.

       This program is free software; you can redistribute it and/or modify it under the terms of the GNU General Public License as published by
       the Free Software Foundation; either version 2 of the License, or (at your option) any later version.

       See the LICENSE file that comes with this distribution for more details.

perl v5.10.1							    2010-03-25				     Net::DRI::Data::Contact::OpenSRS(3pm)
All times are GMT -4. The time now is 09:09 AM.
Unix & Linux Forums Content Copyright 1993-2022. All Rights Reserved.
Privacy Policy