Have you looked at how the DHCP modules on CPAN do their stuff? For example, Net::DHCPClient even seems to have a ->discover method.

If you look at the source of Net::DHCPClient, you'll find that it uses Net::RawIP to send the packet it constructs, so I guess you will have to do the same, or at least something similar.