use-revolution Digest, Vol 10, Issue 99

[Cubist at aol.com]

In a message dated 7/25/04 2:07:20 PM, 
use-revolution-request at lists.runrev.com writes:

>
>Message: 1
>Date: Sun, 25 Jul 2004 09:15:35 -0700
>From: Mark Brownell <gizmotron at earthlink.net>
>Subject: Re: anyone here got a function to find is a string is base64
>   encoded?  
>To: How to use Revolution <use-revolution at lists.runrev.com>
>Message-ID: <DC734429-DE55-11D8-8623-000A95743F7A at earthlink.net>
>Content-Type: text/plain; charset=US-ASCII; format=flowed
>
>
>On Sunday, July 25, 2004, at 08:59 AM, FlexibleLearning at aol.com wrote:
>
>> What about...
>>
>> try
>>   put base64decode(tStr) into tStr
>> catch errnum
>>   return ""
>> end try
>> return tStr
>>
>> /H
>
>
>That's a good idea. What about this for a string test? Base64 is 72 
>characters per line. I suppose you could test for the number of 
>characters in each line.
   Like this?

  function IsItBase64 DerString
    filter DerString with [string consisting of 72 "?"s]
    return (DerString is not "")
  end IsItBase64