#!/usr/bin/perl
use warnings;
use strict;

$|++;

while(<STDIN>) {
  chomp;
  next unless /\[(\d+)\]/ && $1 % 2 == 1; # Only odds
  print "$1 is odd\n";
}