Witam

Jak zrobić z tej linii odnośnik do pliku wgranego na serwer ?

[PHP] pobierz, plaintext 
<?php
print "<br>Orignal Filename:".$_POST["file_name_orig"][$i];
?>
[PHP] pobierz, plaintext 

Dokładnie chodzi o ten wiersz:

[PHP] pobierz, plaintext 
<?php
".$_POST["file_name_orig"][$i];
?>
[PHP] pobierz, plaintext 

jak i gdzie zagnieżdzić

[HTML] pobierz, plaintext 
<a href ... </a>
[HTML] pobierz, plaintext 

?

Chyba raczej :

[PHP] pobierz, plaintext 
<?php
print 'Orginal filename: <a href="'.$_POST["file_name_orig"][$i].'"> costam </a>';
?>
[PHP] pobierz, plaintext 

Niestety ani jeden kod anu drugi nie działa wyskakuje błąd 500

Może podaj cały kod, czyli skąd bierzesz zmienną $i, oraz cały błąd jaki skrypt wyświetlił

[PHP] pobierz, plaintext 
<?php
#!/usr/bin/perl
use CGI;
use strict;
my $share_url = "http://mysite.com/uploads/";
my $cgi = CGI->new();
 
my @file_fields = ('file_name','file_name_orig','file_size','file_status','file_descr','file_mime');
my $h;
@{$h->{$_}}=$cgi->param($_.'[]') for @file_fields;
 
#Files info
print"Content-type: text/html\n\n";
for(0..$#{$h->{file_name}})
{
 print "<b>Filename:</b> $h->{file_name}->[$_]";
 print "<br><b>Orignal Filename:</b> $h->{file_name_orig}->[$_]";
 print "<br><b>File Size:</b> $h->{file_size}->[$_]";
 print "<br><b>File Status:</b> $h->{file_status}->[$_]";
 print "<br><b>File Description:</b> $h->{file_descr}->[$_]";
 print "<br><b>File MIME:</b> $h->{file_mime}->[$_]";
 print "<hr>";
}
 
#Special & Form variables
print "<br><b>Other variables:</b><br>";
for my $x ($cgi->param())
{
 next if grep{$x eq $_.'[]'}@file_fields;
 print"$x => ".$cgi->param($x)."<br>";
}
?>
[PHP] pobierz, plaintext 

a błędu niema takowego , tylko białą strona i napis ERROR 500