X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=helm%2Fmetadata%2Fcreate2%2Ffix_rdf.pl;fp=helm%2Fmetadata%2Fcreate2%2Ffix_rdf.pl;h=0000000000000000000000000000000000000000;hb=869549224eef6278a48c16ae27dd786376082b38;hp=5d86c45c72d9936a7ff38597dea830d3807f03b5;hpb=89262281b6e83bd2321150f81f1a0583645eb0c8;p=helm.git diff --git a/helm/metadata/create2/fix_rdf.pl b/helm/metadata/create2/fix_rdf.pl deleted file mode 100755 index 5d86c45c7..000000000 --- a/helm/metadata/create2/fix_rdf.pl +++ /dev/null @@ -1,29 +0,0 @@ -#!/usr/bin/perl - -$filename = $uri = $ARGV[0]; -$outputfile = $filename.".xml"; -$uri =~ s/^backward/cic:/; -$uri =~ s/(.*),([^,]*),([^,]*)/$1#xpointer(1\/$2\/$3)/; -$uri =~ s/(.*),([^,]*)/$1#xpointer(1\/$2)/; - -print "Now processing file $filename\n"; - -open(HEADER,">>$outputfile"); -print HEADER < - - - -EOT -close(HEADER); - -system("cat $filename >> $outputfile"); - -open(FOOTER,">>$outputfile"); -print FOOTER < - -EOT -close(FOOTER); - -unlink $filename;