![]() |
Hej og Velkommen fra USA til UNIX og Linux Forums! Tak for dit besøg og deltager i vores globale samfund.
|
|
google unix.com
|
|||||||
| Forums | Registrer | Forum Regler | Links | Albums | FAQ | Members List | Kalender | Søgning | Dagens Stillinger | Mark Forums Read |
| Shell Programmering og Scripting Post spørgsmål om ksh, CSH, SH, Bash, Perl, PHP, SED, AWK og ANDRE shell scripts og Shell scriptsprog her. |
Mere UNIX og Linux Forum Emner du måske kan finde Helpful
|
||||
| Tråd | Thread Starter | Forum | Svar | Last Post |
| script til at downloade filer fra ftp site | tiff-mat | Shell Programmering og Scripting | 5 | 09-19-2008 03:46 PM |
| Download filer vha. perl | mirusnet | UNIX for dummyer Spørgsmål & svar | 2 | 12-19-2007 10:04 PM |
| hente filer fra direkte links værktøj? | umen | UNIX for dummyer Spørgsmål & svar | 2 | 07-04-2006 11:00 AM |
| shellscript for at hente filer | ram2s2001 | Shell Programmering og Scripting | 3 | 02-07-2006 08:16 AM |
| Sådan hentes Red Hat plz hlp? | atiato | UNIX for dummyer Spørgsmål & svar | 3 | 02-05-2002 01:21 AM |
![]() |
|
|
LinkBack | Thread Tools | Søg denne tråd | Rate Thread | Display Modes |
|
|
|
||||
|
downloade filer
Hej,
Jeg oplever nogle problemer med at udføre et script til at være i stand til at hente nogle filer via HTTP. Den Perl scriptet er placeret på en Linux på en server ( "/ var / www / cgi-bin / down.pl"), hvor jeg kan køre det via Internet Explorer. Jeg er i stand til at vise den mappe indhold ( "/ home / toto"), men jeg er ikke i stand til at åbne eller gemme filer fra denne mappe på min lokale maskine (Windows XP ved eksempel). Mit mål er at være i stand til at gemme en fil, når jeg klikker på dem og vælge målet på min lokale maskine. Kan nogen hjælpe mig med at lave dette script? tak på forhånd. Code:
#!/usr/bin/perl
use CGI;
$|=1;
my $query=new CGI;
print qq~
<table align="center" width="90%">
<tr><td><font color="black" face="Arial" size="4"><b>Files in current directory</b></td></tr>
<tr>
<td valign="top">
<font color="black" face="Arial" size="2">
~;
$dir="/home/toto";
opendir(DIR, "$dir");
@current = readdir(DIR);
closedir(DIR);
foreach(@current){
unless($_ eq '.' || $_ eq '..' || -d qq~$dir/$_~){
push(@currentfiles, $_);
}
}
@currentfiles = sort { uc($a) cmp uc($b) } @currentfiles;
for($aa = 0; $aa <= $#currentfiles; $aa++){
print qq~
<a href="$dir/$currentfiles[$aa]" target="_blank">$currentfiles[$aa]</a><a href="$dir/$currentfiles[$aa]"> </a></font><br>
~;
}
print qq~
</font></tr>
</table>
Senest redigeret af otheus; 03-08-2009 kl 11:42 AM.. Årsag: kode tags tilføjet |
|
||||
|
De links virker ikke, hvis din webserver ikke er konfigureret til at tillade adgang til disse filer, og din webserver kan sandsynligvis gøre sin egen notering af dem alligevel, kræves ingen script.
Du skal også sætte kode i [code] code tags [/ code], det gør det meget nemmere at læse. |
![]() |
| Bogmærker |
| Thread Tools | Søg denne tråd |
| Display Modes | Bedøm denne tråd |
|
|