Using Getopt to deal with command line options : Getopt « System Functions « Perl






Using Getopt to deal with command line options

      
#!/usr/bin/perl -w



use Getopt::Std;

Getopt::Std::getopts( 'a:b:c:de' );

# Options appear in variables named opt_option, e.g., opt_a.
if ( defined( $opt_a ) ) {
    print "-a flag set to $opt_a\n";
}
if ( defined( $opt_b ) ) {
    print "-b flag set to $opt_b\n";
}
if ( defined( $opt_c ) ) {
    print "-c flag set to $opt_c\n";
}

if ( defined( $opt_d ) ) {
    print "-d flag set to $opt_d\n";
}
if ( defined( $opt_e ) ) {
    print "-e flag set to $opt_e\n";
}

   
    
    
    
    
    
  








Related examples in the same category

1.Simple options
2.GetOptions("file=s" => \$file);
3.Generate random passwords?
4.Extract command-line switches with Getopt::Std
5.Perform consistent command line parsing
6.Process complex command lines
7.Read from a file
8.To turn a feature on or off. Use the exclamation point(!)
9.getopt('pMN');
10.If the value is optional, use a colon
11.For a text string value, use :s for an optional value or =s for a required value:
12.Check if a file exists
13.A double dash (--) by itself signals the end of the command-line switches.