Fix CGI FTP links

cgi-bin/ftp_view.cgi

 #!/usr/bin/env perl
-$url = "ftp://ccg.epfl.ch/";
-print("Location: $url\n\n");
+
+my $url = 'http://epdnew.vital-it.ch/ftp/';
+print "Location: $url\n\n";
 print "Content-type: text/html\n\n";
 
 &printCGIFooter;
@@ -9,7 +10,7 @@ exit (0);
 
 
 sub printHTMLFooter {
-    print ("
+    print "
 <script>
   (function(i,s,o,g,r,a,m){i['GoogleAnalyticsObject']=r;i[r]=i[r]||function(){
     (i[r].q=i[r].q||[]).push(arguments)},i[r].l=1*new Date();a=s.createElement(o),
@@ -19,7 +20,7 @@ sub printHTMLFooter {
   ga('create', 'UA-11543973-1', 'auto');
   ga('send', 'pageview');
 </script>
-");
+";
     # print ("<script type=\"text/javascript\">
     # var gaJsHost = ((\"https:\" == document.location.protocol) ? \"https://ssl.\" : \"http://www.\");
     # document.write(unescape(\"%3Cscript src='\" + gaJsHost + \"google-analytics.com/ga.js' type='text/javascript'%3E%3C/script%3E\"));
@@ -30,6 +31,6 @@ sub printHTMLFooter {
     # pageTracker._trackPageview();
     # } catch(err) {}</script>");
     # print "</BODY></HTML>\n";
+    return;
 }
 
-

htdocs/promoter_elements/etc

+../../etc
\ No newline at end of file