#!/usr/bin/perl -s use Coy; print "-- \n" if $s; # slrn doesn't add it, but mutt does print "briac\n"; eval { enlighten }; $_ = ( split ( /-----\n/s, $@ ) )[1]; chop and print; __END__ #### set signature "/home/briac/.signature-slrn" set editor_command "/home/briac/Coysig -s > /home/briac/.signature-slrn;vim +%d %s -c 'set wrap' -c 'set textwidth=72' -c 'set nocp' -c '?^$'"