Changeset 21213 for src/perl6/STD5_dump_match
- Timestamp:
- 07/04/08 13:39:38 (5 months ago)
- Files:
-
- 1 modified
-
src/perl6/STD5_dump_match (modified) (1 diff)
Legend:
- Unmodified
- Added
- Removed
-
src/perl6/STD5_dump_match
r20860 r21213 14 14 GetOptions("nocolor"=>\$nocolor,"vertical"=>\$vertical,"yaml"=>\$yaml); 15 15 unless ($#ARGV <= 0) { 16 die "USAGE: [--nocolor ] [filename]\n";16 die "USAGE: [--nocolor --vertical] [filename]\n"; 17 17 } 18 18 if ($nocolor) {
