formline( "@<< @<< @<<", '1', '2', '2' );
print "$^A\n";