#!/usr/bin/perl use strict; use lib qw(t . lib ../lib ../../lib ../../../lib ../../../../lib ); use Parrot::Test tests => 3; language_output_is('pyparrot', <<'CODE', <<'OUTPUT', 'list Creation'); list1 = [ 'Hello', 'GoodBye' ] print list1 CODE Hello Goodbye OUTPUT language_output_is('pyparrot', <<'CODE', <<'OUTPUT', 'noarg'); CODE OUTPUT language_output_is('pyparrot', <<'CODE', <<'OUTPUT', 'noarg'); CODE OUTPUT #language_output_is('pyparrot', <<'CODE', <<'OUTPUT', 'noarg'); #CODE #OUTPUT