perl -e "$_=shift();print($x++ % 2 ? 'you are glad ' : 'I am glad ')while($_--)" 4

or

perl -e "print($x++ % 2 ? 'you are glad ' : 'I am glad ') foreach(1..shift())" 4