Select Code to Download

foreach ( glob( "{a,b,c,d}" x 10 ) )
{
    print "$_\n";
    last;
}

foreach ( 'aaaaaaaaaa'..'dddddddddd' )
{
    print "$_\n";
    last;
}