#!/usr/bin/perl -s

use pt::pln;
use locale;

printPN("oco");
