############################################################

=item daft_function()

This is a daft function.  Write general stuff about it here.

Input:  @daft, [ $DEBUG ]

Output: { FAILED => <0|1>, ANSWER => <string> }

or maybe if you want a bit more description

Input:
        @daft - array of useless items
        $DEBUG - optional paramter to give daft verbiage
	
Output:
        Reference to an anonymous hash with these keys
            FAILED => 0 or 1
            ANSWER => string - result of dafting the input 

=cut

############################################################

sub daft_function
{
    my ($self, @daft) = @_;
    #...
    return $result;
}