samba - Revision 1075: /trunk/server/examples/scripts/shares/perl