#!/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', 'noarg'); list1 = [ 1, 2, 3, 4, 5 ] for x in list1: print x * 2 CODE OUTPUT language_output_is('pyparrot', <<'CODE', <<'OUTPUT', 'noarg'); for x in range(1, 10): print x CODE OUTPUT language_output_is('pyparrot', <<'CODE', <<'OUTPUT', 'noarg'); CODE OUTPUT