my $s = '';
say 'String is empty' unless $s;
say 'String is not empty' if $s;