Thanks Jenda.

Is there a particular way I have to implement this?  I have the following 
code but it runs the normal getproto rather than my one.

--------------------------------------
#/bin/perl -w

        sub my_getprotobyname {
                print "hello";
        }
        *CORE::GLOBAL::getprotobyname = \&my_getprotobyname;


        print "Going to function\n";

        my @test = getprotobyname("tcp");

        print @test;

---------------------------------


Jenda said:

What about "replacing" the builtin getprotobyname() and
getprotobynum() functions:

        sub my_getprotobyname {
                ...
        }
        *CORE::GLOBAL::getprotobyname = \&my_getprotobyname;

That looks like the easiest (even though dirty of course) solution.
(Not tested).

Jenda


_________________________________________________________________
Chat with friends online, try MSN Messenger: http://messenger.msn.com


-- 
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]

Reply via email to