equal
deleted
inserted
replaced
13 |
13 |
14 @goto invoke |
14 @goto invoke |
15 |
15 |
16 #!perl |
16 #!perl |
17 |
17 |
18 use strict; |
|
19 use FindBin; # for FindBin::Bin |
18 use FindBin; # for FindBin::Bin |
20 use Getopt::Long; |
19 use Getopt::Long; |
21 use Cwd; |
20 use Cwd; |
22 |
21 |
23 $_ = cwd; |
22 $_ = cwd; |