First, thanks to moklevat for coining the term and to SuicideJunkie for inventing the challenge or at least a similar one (in the ChatterBox, earlier today).

I then created a Perl script that prints "Just another Perl hacker" without using any character more than once in the script. To win at "flog", you need to create the longest Perl script (most characters) that prints "Just another Perl hacker,\n" and also doesn't use any character more than once (I added the comma for tradition and the newline for other reasons).

Since there is no prize, I won't declare a "winner". So here are some suggestions for how to impress your audience:

• Don't resort to control characters unless you have exhausted most of the other characters
• Space and newlines are characters, too. So you can only write a two-line script (with no final newline). But if you want your posting to look impressive, you could add extra whitespace and just note which few whitespace characters are the only required ones.
• Make things look like what they aren't. If you need some mostly-random garbage, make it look like something non-random.

Here's an example of a script that almost never uses the same character twice (it uses two double quotes and prints the wrong thing), in case the concept is unclear:

warn"JustANoTHe' PERL-hick,\012";
[download]

And here is a script to double-check that you haven't used a character twice in your script:

local( $/ );
$f{$_}++ for <> =~ /./gs;
for( sort keys %f ) {
    warn "$f{$_} ($_)s!\n"
        if  1 != $f{$_};
    print $_;
}
[download]

Below is the version I posted to the CB for those who missed it and want to avoid the extra challenge of having no starting point to bias them:

print aADEFHIGJLKBObVQPSRXUTCW^q[+471f)'(>$.0o23#<s:96?&%]
[download]