#!/usr/bin/perl

for (my $n = 0; $n < 268; $n++) {
    if ($n == (40||47||76)) {
       print $n."\n";
    }
}