#!/usr/bin/perl

use warnings;
use strict;

$\ = $/;

@_ =  ( 'a' .. 'b' ) x 2;
print for @_;