scp-owanie plikow, zapisywanie bledow do pliku

ďťż

scp-owanie plikow, zapisywanie bledow do pliku ďťż

scp-owanie plikow, zapisywanie bledow do pliku
Zobacz wiadomości

Cytat
A gdyby tak się wedrzeć na umysłów górę, / Gdyby stanąć na ludzkich myśli piramidzie, / I przebić czołem przesądów chmurę, / I być najwyższą myślą wcieloną. . . Juliusz Słowacki, Kordian

Indeks BCB i MySQL subiekt gt fototapeta

Witamy

scp-owanie plikow, zapisywanie bledow do pliku

blondi - 11-07-2006 01:09
scp-owanie plikow, zapisywanie bledow do pliku
Witajcie,

Dla potrzeb importu roznych danych popelnilam procedure, ktora ma za
zadanie wskazany plik scp-owac ze wskazanej lokalizacji1 do wskazanej
lokalizacji2.

W przypadku, gdy nie ma pliku, ktory ma byc scp-owany skrypt powinien
zapisac komunikat bledu do pliku i zwrocic 1.

Problem polega na tym, ze zapisywany jest tylko pierwszy blad. Przy
kazdym kolejnym zapis do pliku jest opuszczany, nie generuje on zadnego
bledu... jakby nie byl wykonywany. Natomiast jest wykonywany return 1,
ktory znajduje sie zaraz za nim.

Ponizej wklejam zawratosc procedury. Bede wdzieczna za wskazowki, gdzie
szukac bledu...

sub scpResizeFile {
my($conPathShort,$wwwPathShort,$fileName,$scp)=@_;

open FILL, ">>raport.txt" or die "Nie udalo sie otworzyc pliku
raportowego. Zglos problem do administratora.";

@sizes=('91x91','100x100','123x123','128x128');

$fileName =~ s/\.gif/\.jpg/;
foreach $size (@sizes) {
$wwwPath=$wwwPathShort.$size."/";
$conPath=$conPathShort.$size."/";

unless (chdir $wwwPath) {
mkdir $wwwPath;
chdir $wwwPath;
}
$scp->cwd($conPath) or print FILL $scp->{errstr}."\n";

if (not $scp->get($fileName)) {
print $scp->{errstr}."\n";
print FILL $scp->{errstr}."\n" or die "Umarlo: $!\n";
close(FILL);
return 1;
}

$wwwPath=$wwwPathShort;
$conPath=$conPathShort;
}
close(FILL);
return 0;
}

Szymon =?iso-8859-2?Q?Sok=F3=B3?= - 11-07-2006 01:09

On 10 Jul 2006 06:30:15 -0700, blondi wrote:

> Ponizej wklejam zawratosc procedury. Bede wdzieczna za wskazowki, gdzie
> szukac bledu...
Z jakimi parametrami jest wołana procedura, w szczególności czy pierwsze dwa
parametry to ścieżki absolutne? I czy cwd jest jakoś ustawiane przed
wejściem do procedury?

> $wwwPath=$wwwPathShort;
> $conPath=$conPathShort;
Powyższe dwie linie są zbędne, wartość $wwwPath i $conPath nie jest już
używana w tym obiegu pętli - a w następnym i tak na początku te zmienne są
inicjowane.

--
Szymon Sokół (SS316-RIPE) -- Network Manager B
Computer Center, AGH - University of Science and Technology, Cracow, Poland O
http://home.agh.edu.pl/szymon/ PGP key id: RSA: 0x2ABE016B, DSS: 0xF9289982 F
Free speech includes the right not to listen, if not interested -- Heinlein H

blondi - 11-07-2006 01:09

Szymon Sokół napisał(a):
> Z jakimi parametrami jest wołana procedura, w szczególności czy pierwsze dwa
> parametry to ścieżki absolutne? I czy cwd jest jakoś ustawiane przed
> wejściem do procedury?

Przed wejsciem do procedury nie ustawiam cwd, robie to tuz przed
scp-owaniem pliku w linii:
$scp->cwd($conPath) or print FILL $scp->{errstr}."\n";

Dwa pierwsze parametry to sciezki zaczynajace sie od /var/...

Podkreslam, wszystko dziala OK, poza zapisywaniem do logu informacji o
kolejnych nieistniejacych plikach.

> > $wwwPath=$wwwPathShort;
> > $conPath=$conPathShort;
> Powyższe dwie linie są zbędne, wartość $wwwPath i $conPath nie jest już
> używana w tym obiegu pętli - a w następnym i tak na początku te zmienne są
> inicjowane.

Jest potrzebne, foreach wykonuje sie po tablicy @sizes, na poczatku
kazdego obiegu mam linie:
$wwwPath=$wwwPathShort.$size."/";
$conPath=$conPathShort.$size."/";

Pod koniec obiegu musze wyjsc z tej lokalizacji ($size) zeby w
nastepnym wejsc do kolejnej. W innym przypadku tworzyly mi sie katalogi
wewnatrz tych, do ktorych scpowalam plik

Pozdrawiam,

Blondi

Szymon =?iso-8859-2?Q?Sok=F3=B3?= - 11-07-2006 01:09

On 10 Jul 2006 10:30:21 -0700, blondi wrote:

> Szymon Sokół napisał(a):
>> Z jakimi parametrami jest wołana procedura, w szczególności czy pierwsze dwa
>> parametry to ścieżki absolutne? I czy cwd jest jakoś ustawiane przed
>> wejściem do procedury?
>
> Przed wejsciem do procedury nie ustawiam cwd, robie to tuz przed
> scp-owaniem pliku w linii:
> $scp->cwd($conPath) or print FILL $scp->{errstr}."\n";

Aha. Czyli zasadniczo nie wiadomo, *gdzie* ma się znajdować plik otwierany w
ten sposób:
open FILL, ">>raport.txt"
bo zależy to od tego, gdzie akurat *przypadkiem* w momencie wchodzenia do
procedury jest ustawione cwd. Radziłbym użyć tu ścieżki absolutnej.

A $scp->cwd ustala cwd na serwerze *zdalnym*, nie lokalnym... nie o to
pytałem.

>>> $wwwPath=$wwwPathShort;
>>> $conPath=$conPathShort;
>> Powyższe dwie linie są zbędne, wartość $wwwPath i $conPath nie jest już
>> używana w tym obiegu pętli - a w następnym i tak na początku te zmienne są
>> inicjowane.
>
> Jest potrzebne, foreach wykonuje sie po tablicy @sizes, na poczatku
> kazdego obiegu mam linie:
> $wwwPath=$wwwPathShort.$size."/";
> $conPath=$conPathShort.$size."/";
>
> Pod koniec obiegu musze wyjsc z tej lokalizacji ($size) zeby w
> nastepnym wejsc do kolejnej. W innym przypadku tworzyly mi sie katalogi
> wewnatrz tych, do ktorych scpowalam plik

Przepraszam, opadły mi ręce i niczego więcej nie jestem w stanie napisać.
Mam nadzieję, że to tylko ten upał.
--
Szymon Sokół (SS316-RIPE) -- Network Manager B
Computer Center, AGH - University of Science and Technology, Cracow, Poland O
http://home.agh.edu.pl/szymon/ PGP key id: RSA: 0x2ABE016B, DSS: 0xF9289982 F
Free speech includes the right not to listen, if not interested -- Heinlein H

blondi - 11-07-2006 01:09

> > Przed wejsciem do procedury nie ustawiam cwd, robie to tuz przed
> > scp-owaniem pliku w linii:
> > $scp->cwd($conPath) or print FILL $scp->{errstr}."\n";
>
> Aha. Czyli zasadniczo nie wiadomo, *gdzie* ma się znajdować plik otwierany w
> ten sposób:
> open FILL, ">>raport.txt"
> bo zależy to od tego, gdzie akurat *przypadkiem* w momencie wchodzenia do
> procedury jest ustawione cwd. Radziłbym użyć tu ścieżki absolutnej.

Nie zrozumialam o co pytasz. Defaultem cwd jest ustawione w katalogu z
ktorego odpalam skrypt i tam zawsze tworzy sie plik raport.txt, z tym
nie mialam nigdy problemu. Zakladam, ze jesli utworzylam plik i go
otworzylam, to wykorzystujac handler pisze wlasnie do niego, bez
wzgledu na to, gdzie mam ustawione cwd na lokalnym serwerze..

Aczkolwiek moja znajomosc Perla nie jest na tyle zaawansowana, zebym
mogla wyglaszac opinie ze 100% pewnoscia...

> > Jest potrzebne, foreach wykonuje sie po tablicy @sizes, na poczatku
> > kazdego obiegu mam linie:
> > $wwwPath=$wwwPathShort.$size."/";
> > $conPath=$conPathShort.$size."/";
> >
> > Pod koniec obiegu musze wyjsc z tej lokalizacji ($size) zeby w
> > nastepnym wejsc do kolejnej. W innym przypadku tworzyly mi sie katalogi
> > wewnatrz tych, do ktorych scpowalam plik
>
> Przepraszam, opadły mi ręce i niczego więcej nie jestem w stanie napisać.
> Mam nadzieję, że to tylko ten upał.

I tu juz nie wiem... czy to ja namotalam ze Ci rece opadly? ;)

Koniec koncow ominelam problem otwierajac log na poczatku pliku i
zamykajac go na koncu... ale nie podoba mi sie to rozwiazanie...
Chcialabym rowniez wiedziec, dlaczego poprzednie nie dzialalo...

Blondi

blondi - 11-07-2006 01:10

> Nie zrozumialam o co pytasz. Defaultem cwd jest ustawione w katalogu z
> ktorego odpalam skrypt i tam zawsze tworzy sie plik raport.txt, z tym
> nie mialam nigdy problemu. Zakladam, ze jesli utworzylam plik i go
> otworzylam, to wykorzystujac handler pisze wlasnie do niego, bez
> wzgledu na to, gdzie mam ustawione cwd na lokalnym serwerze..

teraz ja namieszalam... przez ten upal zapewne :)

Teraz rozumiem co chciales napisac i wyglada na to, ze masz 200%
racji... przed wywolaniem procedury powinnam ustawic cwd na katalog z
ktorego odpalam skrypt, zeby to poprawnie dzialalo.

Dzieki wielkie :)

Blondi

Szymon =?iso-8859-2?Q?Sok=F3=B3?= - 11-07-2006 01:10

On 10 Jul 2006 13:17:45 -0700, blondi wrote:

> I tu juz nie wiem... czy to ja namotalam ze Ci rece opadly? ;)

No, przeanalizuj jeszcze raz tę pętlę i co w niej robisz z $wwwPath...

--
Szymon Sokół (SS316-RIPE) -- Network Manager B
Computer Center, AGH - University of Science and Technology, Cracow, Poland O
http://home.agh.edu.pl/szymon/ PGP key id: RSA: 0x2ABE016B, DSS: 0xF9289982 F
Free speech includes the right not to listen, if not interested -- Heinlein H

Szymon =?iso-8859-2?Q?Sok=F3=B3?= - 11-07-2006 01:10

On 10 Jul 2006 13:20:00 -0700, blondi wrote:

>> Nie zrozumialam o co pytasz. Defaultem cwd jest ustawione w katalogu z
>> ktorego odpalam skrypt i tam zawsze tworzy sie plik raport.txt, z tym
>> nie mialam nigdy problemu. Zakladam, ze jesli utworzylam plik i go
>> otworzylam, to wykorzystujac handler pisze wlasnie do niego, bez
>> wzgledu na to, gdzie mam ustawione cwd na lokalnym serwerze..
>
> teraz ja namieszalam... przez ten upal zapewne :)
>
> Teraz rozumiem co chciales napisac i wyglada na to, ze masz 200%
> racji... przed wywolaniem procedury powinnam ustawic cwd na katalog z
> ktorego odpalam skrypt, zeby to poprawnie dzialalo.

Ja w ogóle jestem za unikaniem chdir(), jeśli to tylko możliwe. Bo potem się
zapomina, gdzie się jest (z cwd). Lepiej wszędzie używać absolutnych
ścieżek.

--
Szymon Sokół (SS316-RIPE) -- Network Manager B
Computer Center, AGH - University of Science and Technology, Cracow, Poland O
http://home.agh.edu.pl/szymon/ PGP key id: RSA: 0x2ABE016B, DSS: 0xF9289982 F
Free speech includes the right not to listen, if not interested -- Heinlein H

Clauser - 25-01-2007 02:36
Question by your forum
Hello! I want to know, where you have a section for advertising at a forum? Or it is not present? I have not found it.
P.S. Are you see storm in Europe? It's a horror...

orofemef - 21-02-2007 23:31
adult free online dating service
Oh my, a mild
adult black dating free service
and <a href=" http://melodenes.alkablog.com/?adult dating online service ">adult dating free dating</a>
arrogantly sneered one flaunting.

Thanks!

isywunot - 27-02-2007 01:24
clenbuterol cytomel cycle
anabolic steroids clenbuterol or clenbuterol syrup clenbuterol and cytomel with side effects http://clenbuterolz.alkablog.com/

aruxuxyr - 18-03-2007 07:15
äĺřĺâűĺ áë˙äč číäčâčäóŕëęč
áë˙äč ęóđăŕíŕ
ěŕëü÷čříčę ěŕëîëĺňí˙˙ áë˙äü ńęŕ÷ŕňü mp3, ďĺńĺíęŕ áë˙äč, ćčđíűĺ áë˙äč
with ôîđóě áë˙äĺé

.

ysivehob - 09-04-2007 15:06
adult dating in your town!!!!
adult dating

Welcome!

Stasigrag - 24-09-2007 16:50
Subject3
Hi nice site i licke him ty.
<a href="http://stasig.fateback.com">Stasrag</a>
http://stasig.fateback.com

Stasigragov - 27-09-2007 20:23
Subject2
Hello, nice site keep up good job!!!
http://accomodations-ragovij.cn/

używam czcionki wielkości 1296 pt na pliku o wielkości 800x600 =?iso-8859-2?q?Pro=B6ba_o_konwersj=EA_pliku_CDR_do_wersji_11_ lub_ni=BFszej?= [postgre]PostgreSQL 8.1 + system plikow [MySQL]: Odzyskanie z pliku zawierającego wiele baz danych tylko jednej wybranej bazy Skrypt przeszukujacy dwa pliki tekstowe i dopisujacy zadane znaki do drugiego pliku =?iso-8859-2?Q?Program_do_kompresji_JPG_z_podaniem_wielko=B6c i_pliku?= =?iso-8859-2?q?Eksport_do_pliku_z_nag=B3=F3wkami_kolumn?= [MS SQL 2005 EX] Podmiana pliku bazy danych import danych z pliku txt do Oracle-10g problem daty Jak wyciągnąć fragment grafiki (klatka, kilka sekund video) z pliku

Cytat

Decede mihi sole - nie zasłaniaj mi słonca.
Gdy kogoś kochasz, jesteś jak stworzyciel świata - na cokolwiek spojrzysz, nabiera to kształtu, wypełnia się barwą, światłem. Powietrze przytula się do ciebie, choćby był mróz, a ty masz w sobie tyle radości, że musisz ją rozdawać wokoło, bo się w tobie nie mieści
Hoc fac - tak czyń.
A tergo - od tyłu; z tyłu.
I czarne włosy posiwieją. Safona

Free website template provided by freeweblooks.com

Darmowy hosting zapewnia PRV.PL