Help for this page

Select Code to Download


  1. or download this
    my $water_samples = join '', map chr, 113, 101, 769;
my $last_sample = substr($water_samples, -1, 1);
print(ord($last_sample), "\n");
  2. or download this
    my $water_samples = join '', map chr, 113, 101, 769;
$water_samples = reverse($water_samples);
my $last_sample = substr($water_samples, 0, 1);
print(ord($last_sample), "\n");