From Code to Community: Sponsoring The Perl and Raku Conference 2025 Learn more

NINE / Inline-Python-0.57 / t / 26undef.t 

            

              
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15

              
use Test::Simple tests => 2;
use strict;
use warnings;
use Inline Config => DIRECTORY => './blib_test';
use Inline Python => <<'END';
def debug(x):
    return str(x)
END
my @a = ('foo' , 'bar', 'baz');
delete $a[1];
ok(debug(undef) eq 'None');
ok(debug(\@a) eq "['foo', None, 'baz']");