#!/usr/bin/Perl
use strict; use warnings;
use y;