ExtBasic 8 Tutorial

[sandwich]

So Bill Gates was tired of VisualBasic and now did some Perl, too bad; this script has a security flaw that allows everyone access to the company records! Fix the flaw for him!

#!/usr/bin/perl

chomp(my $User = `/usr/bin/whoami`);

print "Checking your access level...\n";

if ($User == 'BillGates')
{
print "Authorized! Here are the company records:\n" . `cat /home/BillGates/CompanyRecords.db`;
die("Closing...\n");
}

die("You're not authorized!\n");

OK, so there seems to be quite a lot of emphasis on the fact that it's Bill Gates. He's used to C++ (and VB) syntax, which gives us a clue. Is there something about Perl syntax that differs quite significantly from most languages?

Perhaps this will help:
***SPOILER***http://www.ozzu.com/programming-forum/perl-single-line-statement-blocks-t59123.html***SPOILER***

Essentially this should be simple for anyone who's experienced in Perl (which incidentally doesn't include myself :S) - hope I haven't given *too* much away

[omniwrath540]

That link really isn't relevant. A better link would be [one about perl operators] that site is a tutorial that goes over what you need to know to beat the mission

[CutThroat]

If you decided not to follow the links above which are huge spoilers, you just need to actually learn some perl, instead of guessing what things do based on other languages.

[supr_k9]

the first link was awesome. it had everything needed to solve this mission.

the second link...well all i get is a blank, empty page

[filosfer]

omniwrath540 thanks buddy that was really a nice link, it help me out . .

[alien_av]

well, replacing the things talked about at the links for the correct ones didn't work for me =\ do i need to make additional changes?

-edit-
done it now

[OneArrow]

After copying the code and trying it locally (with the original code, and my own apparently correct solution), I think the mission may be bugged. Can someone else confirm?

[sharpskater69]

Mission is fine, I just checked. With the link already posted, I don't think it would spoiling to tell you that strings are checked differently from numbers in Perl.

[OneArrow]

Mission is fine, I just checked. With the link already posted, I don't think it would spoiling to tell you that strings are checked differently from numbers in Perl.

I've used the correct string comparison - like I said, I actually tested the code on my machine to make sure I wasn't missing anything (it's been a while since I've used Perl, but not that long :p). It didn't work earlier today, but it seems to be working now, thank you.

[Mortecai4]

Is the error in this code a syntax error or what?
i don't see whats wrong with it.