Mercurial > hg > Members > anatofuz > anatofuz-tools
comparison index.cgi.pl @ 5:46d936853422
un used DDP module
author | Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp> |
---|---|
date | Tue, 07 May 2019 06:37:31 +0900 |
parents | c168b4b36ea3 |
children | 5b8f7c3dd929 |
comparison
equal
deleted
inserted
replaced
4:c168b4b36ea3 | 5:46d936853422 |
---|---|
1 #!/usr/bin/env perl | 1 #!/usr/bin/env perl |
2 use strict; | 2 use strict; |
3 use warnings; | 3 use warnings; |
4 | |
5 use DDP; | |
6 | 4 |
7 my ($tartget_hg_version,) = map{ m|/usr/local/Cellar/mercurial/(.*)|; $1} glob "/usr/local/Cellar/mercurial/*"; | 5 my ($tartget_hg_version,) = map{ m|/usr/local/Cellar/mercurial/(.*)|; $1} glob "/usr/local/Cellar/mercurial/*"; |
8 | 6 |
9 while (my $line = <DATA>){ | 7 while (my $line = <DATA>){ |
10 if ($line =~ /^(?!#)sys\.path\.insert/) { | 8 if ($line =~ /^(?!#)sys\.path\.insert/) { |