Select Code to Download

# O(n^2)
for my $i (0..$#a-1) {
...
            if ($a[$_+1] < $a[$_]);
  }
}

# O(n)
my $truestatus;
...
        last
    }
}