Re: problems with decoding by using base64 method

Hi anil1.perl, welcome to the Monastery!

Without seeing the code that produced the files and tries to decode them back, we can't help you much. Sounds like a missing binmode somewhere.

($q=q:Sq=~/;[c](.)(.)/;chr(-||-|5+lengthSq)`"S|oS2"`map{chr |+ord
}map{substrSq`S_+|`|}3E|-|`7**2-3:)=~y+S|`+$1,++print+eval$q,q,a,
[download]

Comment on Re: problems with decoding by using base64 method Download Code

Replies are listed 'Best First'.
Re^2: problems with decoding by using base64 method by anil1.perl (Initiate) on Aug 03, 2016 at 11:40 UTC
Thanks for your reply. Actually we have legacy PERL application which encodes(using base64) the file content and puts data into the DB. Now we have written a script to download & decode those attachment from that DB. Below is the code we are using for this: Read more... (8 kB)	[reply] [d/l]
Re^3: problems with decoding by using base64 method by derby (Abbot) on Aug 03, 2016 at 12:12 UTC
That was tough to wade through, you should put code in-between <code>...</code> tags. But basically, I see this `my $filePath1 = "/tools/busapps/LAMP/dev/APP/htdocs/APP/APP_Attachment +s/2016/LGop.pdf"; open (my $upload_filehandle,'<',$filePath1); binmode $upload_filehandle; my $filecontents; { local $/ = undef; $filecontents = <$upload_filehandle>; } my $fContent = decode_base64( $filecontents );` [download] and unless your file naming conventions are strange, a pdf file is not base64 encoded. What you need to do is first identify and isolate a file that is failing to decode. Move it off to the side and then write a very small script that just opens that problem file and tries to decode_base64 it. More than likely, you'll find the problem is with the actual file (it's not base64 encoded) and not the decode_base64 routine. -derby	[reply] [d/l]
Re^4: problems with decoding by using base64 method by anil1.perl (Initiate) on Aug 03, 2016 at 12:55 UTC
Hi Derby, Thanks for your reply. We have created a script & doing what you said as below 1.uploading the encoded file to DB 2.Downloading the file & decoding it. Files which have images/scanned images/headers & footers are not opening but the other files (text) are opened. Any thoughts on this? Regards, Anil	[reply]
Re^5: problems with decoding by using base64 method by CountZero (Bishop) on Aug 03, 2016 at 19:10 UTC
Re^6: problems with decoding by using base64 method by anil1.perl (Initiate) on Aug 04, 2016 at 10:28 UTC
Some notes below your chosen depth have not been shown here
Re^3: problems with decoding by using base64 method by coicles (Sexton) on Aug 07, 2016 at 00:02 UTC
If this is running under Windows, extra bytes are probably being added when you write your decoded binary data from the `$fContent` variable to `OFILE`. If this is the case, you could fix it by adding the line `binmode OFILE;` immediately after lines which begin with `open ( OFILE,`...	[reply] [d/l] [select]