-my($dbname, @targets) = @ARGV;
-if (!defined $dbname) {
- print STDERR "Usage $0: <IRSpy-database> [<target> ...]\n";
- print STDERR "If no targets are specified, all targets in DB are tested\n";
+my %opts;
+if (!getopts('t:', \%opts) || @ARGV < 1) {
+ print STDERR "\
+Usage $0: [options] <IRSpy-database> [<target> ...]
+If no targets are specified, all targets in DB are tested.
+ -t <test> Run the specified <test> [default: all tests]
+";