Help for this page

Select Code to Download

Select or download this
```
my $username = shift;
my %logins = @_;
```
Select or download this
```
if ($pass <=> $logins{$username})
```
Select or download this
```
if( $pass eq $logins{$username} )
```
Select or download this
```
if ($selection == "1")
```
Select or download this
```
if ($selection == 1)
```