#!/usr/local/bin/perl
for ((1,2)) {
} else {

print 1; }