Sorry, no cool snippets. I basically use it for s/// loops when I'mforced to edit text outside of Emacs (e.g. editing this reply). WhenI installed it, I honestly expected to use it more than I have.

Update: Actually, I have found a use for it. This little nasty in ~/Library/PerlPad/startup.pl lets me use Emacs to edit PM posts:

#!/usr/bin/env perl

use File::Temp 'tempfile';

register_function 'emacsify',
q{
    my ($fh, $f) = tempfile;
    print $fh $_;
    close $fh;
    open OSA, "|osascript " or die $!;
    my $osa = <<EOS;
-- set theapp to path to frontmost application as string
tell application "Emacs" to activate
do shell script "emacsclient '$f'"
-- tell application theapp to activate
EOS
    print OSA $osa;
    close OSA or die $!;
    open IN, "$f";
    unlink $f;
    undef $/;
    $_ = <IN>;
    close IN;
    s/^(.{70,80})\n/$1/gm;
    $_;
};

1;
[download]