print @$r[0..2];