Lines Matching refs:opt_d
40 use vars qw($opt_b $opt_d $opt_f $opt_h $opt_i $opt_k $opt_l $opt_m $opt_n $opt_p $opt_q $opt_s $opt_t $opt_u $opt_v $opt_w);
63 $opt_d = 'release';
122 if(!defined($opt_d)) {
124 $opt_d = 'release';
129 if(defined($urls{$opt_d})) {
130 $url = $urls{$opt_d};
132 die "The URL for '$opt_d' is not HTTPS. Use -k to override (insecure).\n";
136 $url = $opt_d;
157 if ( $opt_d =~ m/^risk$/i ) { # Long Form Warning and Exit
178 print "\t\t ", join( ", ", map { ( $_ =~ m/$opt_d/ ) ? "$_ (default)" : "$_" } sort keys %urls ), "\n";