Re: [misterhouse-users] Coding help

[robin <ro...@ji...>]

Actually, what I wrote is not right, it looks like there is at least an or and 
some brackets missing, but cant fathom out where for Perl... robin
On Wednesday 30 Jun 2004 7:30 am, robin wrote:
> David, thank you, I can see the way that is going, I think what it needs
> for it to work in one statement is something like this....
>
>  if ( said $rv_dialup eq "Start" and
>       ($Day eq "Fri" or "Sat"
>       time_less_than("10:00PM") ) ) {
>
> Is that valid/correct Perl coding. In my mind (ex COBOL 20yrs ago) that
> look sort of right.  So, can start internet anytime Friday or anytime
> Saturday or any day before 10PM.
> Thank you for your help
> robin
>
> On Tuesday 29 Jun 2004 11:39 pm, David Norwood wrote:
> > How about this:
> >
> >  if ( said $rv_dialup eq "Start" and
> >      ($Day eq "Mon" or
> >      time_less_than("10:00PM") ) ) {
> >
> >
> > ----- Original Message -----
> > From: "robin" <ro...@ji...>
> > To: <mis...@li...>
> > Sent: Tuesday, June 29, 2004 2:40 PM
> > Subject: [misterhouse-users] Coding help
> >
> > > Could somebody help please.  I made up the following piece of code to
> >
> > allow my
> >
> > > kids to start the internet via my PC, from their web browsers using
> > > Misterhouse.  Until today I did not have the day and time tests, but on
> > > adding these it seems to ignore them.  Last week I added the time test
> > > and
> >
> > it
> >
> > > seemed ok, but now with both it just seems to start the internet.  What
> >
> > I'm
> >
> > > trying to do is to  stop the kids starting the internet after 10pm Sun
> >
> > thru
> >
> > > Thur (ie there is a schoolday next day).  So, I was hoping somebody
> > > could show me how to convert this test to a Sun thru Thur, then I'll
> > > add a
> >
> > Fri/Sat
> >
> > > without the time test.
> > >
> > > $rv_dialup = new Voice_Cmd '[Stop,Start] Internet';
> > > $rv_dialup->set_info("Start or stop the internet connection");
> > > $rv_dialup->set_authority('anyone');
> > >
> > > if ( said $rv_dialup eq "Start" and
> > >     Day "Mon" and
> > >     time_less_than("10:00PM") ) {
> > >     system("isdnctrl dial ippp0");
> > >     print_log "rdialup.pl: Attempting to start the network, please
> > > wait"; speak     "Attempting to start the network, please wait";
> > > }
> > >
> > > many thanks for your help, in anticipation, regards, robin
> > >
> > >
> > >
> > > -------------------------------------------------------
> > > This SF.Net email sponsored by Black Hat Briefings & Training.
> > > Attend Black Hat Briefings & Training, Las Vegas July 24-29 -
> > > digital self defense, top technical experts, no vendor pitches,
> > > unmatched networking opportunities. Visit www.blackhat.com
> > > ________________________________________________________
> > > To unsubscribe from this list, go to:
> >
> > http://sourceforge.net/mail/?group_id=1365
> >
> >
> >
> >
> > -------------------------------------------------------
> > This SF.Net email sponsored by Black Hat Briefings & Training.
> > Attend Black Hat Briefings & Training, Las Vegas July 24-29 -
> > digital self defense, top technical experts, no vendor pitches,
> > unmatched networking opportunities. Visit www.blackhat.com
> > ________________________________________________________
> > To unsubscribe from this list, go to:
> > http://sourceforge.net/mail/?group_id=1365
>
> -------------------------------------------------------
> This SF.Net email sponsored by Black Hat Briefings & Training.
> Attend Black Hat Briefings & Training, Las Vegas July 24-29 -
> digital self defense, top technical experts, no vendor pitches,
> unmatched networking opportunities. Visit www.blackhat.com
> ________________________________________________________
> To unsubscribe from this list, go to:
> http://sourceforge.net/mail/?group_id=1365