#!/usr/bin/perl -l

use strict;

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