summaryrefslogtreecommitdiff
path: root/sample/getopts.test
blob: adef7628db5a4283c038f884df0dcf2cac6383bd (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
#! /usr/local/bin/ruby

load("parsearg.rb")

def usage()
  printf("Usage:\n")
  printf("This is Getopt test program \n")
end

$USAGE = 'usage'
parseArgs(0, !nil, "d", "x:", "y:", "version", "geometry:")
if ($OPT_d)
  if ($OPT_x)
    printf("x = %d\n", $OPT_x.to_i)
  end
  if ($OPT_y)
    printf("y = %d\n", $OPT_y.to_i)
  end
  if ($OPT_geometry)
    printf("geometry = %s\n", $OPT_geometry)
  end
end

if ($OPT_version)
  printf("version 1.00\n")
end

while ($ARGV.length != 0)
  print ("other = ", $ARGV[0], "\n")
  $ARGV.shift
end