MEGOLDVA - perl változóban az adat megbuggyan
Vagy én buggyantam meg?
Szervusztok!
Egy Crypt::CBC-vel encrypt-ált adatot feltolok Net::FTP vel majd ezt az adatot szedem le File::Fetch-el direktbe egy string típusú változóba amit szeretnék decryptálni. Az eredeti adat nem áll viszont elő. Elkezdtem piszkálni és érdekes eredményre jutottam.
A vett adatokat ha file-ba írom, majd visszaolvasom minden megjavul. Az md5 összege viszont nem változik!
adat - encrypt - ftp - netSzerver - get - $ciphertext - decrypt - szemét
adat - encrypt - ftp - netSzerver - get - $ciphertext \ / nemA$ciphertextVáltozó - decrypt - adat
file
Az md5 összegeket Digest::MD5-el állítom elő, és az megegyezik a a file írás - olvasás művelet előtt/után.
Itt jutott eszembe hogy valami kódlap váltás zűr lehet talán? Kínosan ügyelve átírok mindent :raw-ra, de semmi.
Próbaképp a letöltést átírtam LWP::Simple::get-re de sajnos ez sem jött be.
Mitől változik meg az adat és hol?
A hozzászólásokat nagyon köszönöm előre is!
vfero
- Tovább (MEGOLDVA - perl változóban az adat megbuggyan)
- 7512 megtekintés