Oh, it all makes sense now......... what are you going on about man?

> Hi,
>
>
> my $line = <STDIN>;
> chomp $line;
> 
> my $first_space = index($line , " ");
> 
> my $a = substr($line, 0, $first_space);
> 
> 
> 
> my $last_space = rindex($line , " ");
> my $b = substr($line, $last_space+1);
> 
> 
> 
> 
> if (0 < index($line, "*")) {
>     print $a * $b, "\n";
> }
> if (0 < index($line, "+")) {
>     print $a + $b, "\n";
> }

________________________________________________________________________
This email has been scanned for all viruses by the MessageLabs Email
Security System. For more information on a proactive email security
service working around the clock, around the globe, visit
http://www.messagelabs.com
________________________________________________________________________

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

Reply via email to