#!/usr/bin/perl -l

use strict;

my $x;
print +($x eq '') ? 'Yes' : 'No';