Well, like I said, I don't really know that much about the Sybase module. I haven't, like, you know, actually used it or anything, personally. I was basically guessing, from a quick glance-over, that it might have been pure Perl. It may also be that it isn't, in which case just copying won't work.

$;=sub{$/};@;=map{my($a,$b)=($_,$;);$;=sub{$a.$b->()}}
split//,".rekcah lreP rehtona tsuJ";$\=$ ;->();print$/
[download]