Hi Arijit,
As far as I'm aware SIGnals are the only generic
mechanism you can use to jump out of code from any
point of execution...
So without knowing the contents of the subroutine
you're running it's not easy to suggest a way for it
to work. Perhaps you could post that subroutine?
Is it doing any 'blocking' activities? Coudl there be
an external factor involved in this subroutine taking
a long time intermittently?
Marty
--- Arijit Das <[EMAIL PROTECTED]> wrote:
> How can I time out a subroutine/function?
>
> print "My code is executing...the next sub inokation
> takes a long time simetimes. SO, I want to ensure
> that
> at max it should take 5 secsonds.";
> my $device_name = Quota::getqcarg($path);
>
>
> I want to timeout Quota::getqcarg($path) but I don't
> want to use the $SIG{ALRM} technique because I am
> using a older version of Perl which doesn't support
> safe/defferred signals.
>
> Is there any other technique by which I can achive
> this timeout?
>
> Thanks,
> Arijit
>
>
>
> ____________________________________________________
> Start your day with Yahoo! - make it your home page
> http://www.yahoo.com/r/hs
>
> _______________________________________________
> Perl-Unix-Users mailing list
> Perl-Unix-Users@listserv.ActiveState.com
> To unsubscribe:
> http://listserv.ActiveState.com/mailman/mysubs
>
___________________________________________________________
Yahoo! Messenger - NEW crystal clear PC to PC calling worldwide with voicemail
http://uk.messenger.yahoo.com
_______________________________________________
Perl-Unix-Users mailing list
Perl-Unix-Users@listserv.ActiveState.com
To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs
