Lines Matching refs:unless
21 &usage unless $ARGV[0] =~ /=/;
25 &usage unless defined $ARGV[0];
41 $map = $DEFAULT_MAP unless defined $map;
42 $map .= $DEFAULT_EXT unless $map =~ m|/[^/]+\.[^/]+$|;
57 next unless defined $current;
63 return unless $empty;
78 die "bad map entry $_ (def, map $map)" unless /^0x\S\S(\S\S)$/;
79 $tmp[$code] = hex $1 unless $tmp[$code];
88 die "bad map entry $_ (kbd, map $map)" unless /^0x\S\S(\S\S)$/;
89 $table[$tmp[$code]] = hex $1 unless $table[$tmp[$code]];
