X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=helm%2Fgraphs%2Ftools%2Fmk_html.pl;fp=helm%2Fgraphs%2Ftools%2Fmk_html.pl;h=0000000000000000000000000000000000000000;hb=e108abe5c0b4eb841c4ad332229a6c0e57e70079;hp=6ca4d0bcf3caa819d58eaa87bc3424726e353f50;hpb=1456c337a60f6677ee742ff7891d43fc382359a9;p=helm.git diff --git a/helm/graphs/tools/mk_html.pl b/helm/graphs/tools/mk_html.pl deleted file mode 100755 index 6ca4d0bcf..000000000 --- a/helm/graphs/tools/mk_html.pl +++ /dev/null @@ -1,49 +0,0 @@ -#!/usr/bin/perl - -use URI::Escape; - -print < - - - Graph - - - - -EOT - -my $count = 0; - -while () { - $count++; - my (undef,$point1,$point2,$uri) = split; - my ($point1x,$point1y) = split /,/,$point1; - my ($point2x,$point2y) = split /,/,$point2; - $point1y = substr($point1y,0,-1); - $point2y = substr($point2y,0,-1); - $point1x = substr($point1x,1); - $point2x = substr($point2x,1); - - print < -EOT -} - -print < - - - -EOT