H
himanshu.garg
% cat test.pl
use Test::Simple tests => 2;
use strict;
my $undefined_var;
ok(!$undefined_var->{id}, '!$undefined_var->{id}');
ok(!undef->{id}, '!undef->{id}')
% perl test.pl
1..2
ok 1 - !$request->{id}
Can't use an undefined value as a HASH reference at test.pl line 5.
# Looks like you planned 2 tests but only ran 1.
# Looks like your test died just after 1.
use Test::Simple tests => 2;
use strict;
my $undefined_var;
ok(!$undefined_var->{id}, '!$undefined_var->{id}');
ok(!undef->{id}, '!undef->{id}')
% perl test.pl
1..2
ok 1 - !$request->{id}
Can't use an undefined value as a HASH reference at test.pl line 5.
# Looks like you planned 2 tests but only ran 1.
# Looks like your test died just after 1.