Joined: 10 Jun 2004 Posts: 560 Location: North West, England
Posted: Fri Dec 31, 2004 7:22 pm Post subject:
in elsif
Code:
#Made By Purcelly <br />#For Innington<br /><br />if($msg =~ /^!Police/)<br />{<br />&send($self,"Here Is One Excuse To Get Rid Of The Police:");<br /> my @quotes = ("OOOOhh your a policeman?!?!? I thought you were just another speeder!!! I was trying to get away so you didnt hit me!",<br /> ""I'm sorry officer but dunken donuts is right ahead not here." ",<br /> "Sorry officer, I was trying to kill a bug under my gas pedal (For speeding tickets)",<br /> "If I was speeding, you probably where speeding to catch me, so how bout we forget abut the whole thing!",<br /> "I'm sorry I was speeding officer but I have diarrhea. ",<br /> "So that’s what those signs are there for. ",<br /> "(Running a stop sign) I’m sorry officer; I thought the sign said POTS. (Dyslexic)",<br /> "I'm sorry, Officer, but my child has to use the bathroom",<br /> "My wife is pregnant, I'm trying to get to the hospital ASAP! (great for speeding tickets)");<br /> $result = $quotes[int(rand(scalar(@quotes)))];<br /> $self->sendmsg("$result", Font => "Arial",Color => '017151',Effect => "B");}<br />}
#Made By Purcelly <br />#For Innington<br /><br />if($msg =~ /^!Police/)<br />{<br />&send($self,"Here Is One Excuse To Get Rid Of The Police:");<br /> my @quotes = ("OOOOhh your a policeman?!?!? I thought you were just another speeder!!! I was trying to get away so you didnt hit me!",<br /> ""I'm sorry officer but dunken donuts is right ahead not here." ",<br /> "Sorry officer, I was trying to kill a bug under my gas pedal (For speeding tickets)",<br /> "If I was speeding, you probably where speeding to catch me, so how bout we forget abut the whole thing!",<br /> "I'm sorry I was speeding officer but I have diarrhea. ",<br /> "So that’s what those signs are there for. ",<br /> "(Running a stop sign) I’m sorry officer; I thought the sign said POTS. (Dyslexic)",<br /> "I'm sorry, Officer, but my child has to use the bathroom",<br /> "My wife is pregnant, I'm trying to get to the hospital ASAP! (great for speeding tickets)");<br /> $result = $quotes[int(rand(scalar(@quotes)))];<br /> $self->sendmsg("$result", Font => "Arial",Color => '017151',Effect => "B");}<br />}
Did you even test that?
Quote:
""I'm sorry officer but dunken donuts is right ahead not here." ",
Quote:
""I'm sorry officer but dunken donuts is right ahead not here." ",
(blue = quoted strings, red = Perl "codes").
That wouldn't work. Test things before you post them. _________________ Current Site (2008) http://www.cuvou.com/
Joined: 19 Jul 2004 Posts: 556 Location: Los Angeles, CA votes: 1
Posted: Sat Jan 01, 2005 4:24 am Post subject:
instead of posting the same code (that dosnt work) over and over again with diffrent lists......why not make one post with the sample code (working) and all your lists. and just update that post with your lists..... _________________ [ matt ]
if($message =~ /^!Police/){<br />$self->sendMessage("Here Is One Excuse To Get Rid Of The Police:");<br /><br />my @quotes = ("OOOOhh your a policeman?!?!? I thought you were just another speeder!!! I was trying to get away so you didn\'t hit me!",<br />"\"I\'m sorry officer but dunken donuts is right ahead not here.\" ",<br />"Sorry officer, I was trying to kill a bug under my gas pedal (For speeding tickets)",<br />"If I was speeding, you probably where speeding to catch me, so how about we forget abut the whole thing!",<br />"I\'m sorry I was speeding officer but I have diarrhea. ",<br />"So that\’s what those signs are there for. ",<br />"(Running a stop sign) I\’m sorry officer; I thought the sign said POTS. (Dyslexic)",<br />"I\'m sorry, Officer, but my child has to use the bathroom",<br />"My wife is pregnant, I\'m trying to get to the hospital ASAP! (great for speeding tickets)",<br />);<br /><br />my $result = $quotes[int(rand(scalar(@quotes)))];<br />$self->sendmsg("$result", Font => "Arial",Color => '017151',Effect => "B");<br />}
User Control Panel
