# my $str = "some string\n"; given $str { chomp; print $_." is now our topic\n"; } #