Some fun with quines

[Brian G <brian@xxxxxxxxxxxxxxxx>]

A gambas script quine.. just a little fun... silly obfuscation ...

------------------- cut after here ------------------------

#!/usr/bin/env gbs3
' Gambas Script File Created 10/23/2025 14:05:03
' A Quine, in gambas script
Dim a As String = 
"IyEvdXNyL2Jpbi9lbnYgZ2JzMyYxJyBHYW1iYXMgU2NyaXB0IEZpbGUgQ3JlYXRlZCAxMC8yMy8yMDI1IDE0OjA1OjAzJjEnIEEgUXVpbmUsIGluIGdhbWJhcyBzY3JpcHQmMURpbSBhIEFzIFN0cmluZyA9ICYyJjFQcmludCBTdWJzdChVbkJhc2U2NChhKSwgIlxuIiwgUXVvdGUoYSkpJjFRdWl0IDAmMUNhdGNoJjFFcnJvciAiU2NyaXB0IEVycm9yID4iOzsgZXJyb3IudGV4dCAmICJcbiIgJiBlcnJvci53aGVyZQ=="
Print Subst(UnBase64(a), "\n", Quote(a))
Quit 0
Catch
Error "Script Error >";; error.text & "\n" & error.where

-------------------------- cut until before here 
-------------------------------------------------------

Save to a file named quine.gbs, make sure no extra carriage return after 
last line

then

cat quine.gbs | gbs3 - | gbs3 - | gbs3 - > quine2.gbs ; diff quine.gbs 
quine2.gbs

as many as you like ... lol

--
~~~~ Brian

Attachment: OpenPGP_0x78BFB26402F48419.asc
Description: OpenPGP public key

Attachment: OpenPGP_signature.asc
Description: OpenPGP digital signature