@a = (0..100);
@b = map {if ($_ % 2 != 0 && $_ % 5 == 0){$_}} @a;
print @b;