By default, chomp returns the number of newline characters it removed. To view the number returned, store it into a scalar variable, as you would any other function in Perl. You can prove this to yourself by writing some code, such as:

use strict;
use warnings;

my $x = "foo\n";
my $count = chomp $x;
print "$count\n";

my @arr = ("bar\n", "boo\n");
$count = chomp @arr;
print "$count\n";

__END__

Prints out:
1
2
[download]

Before you ask any more questions, write some code, run the code, and see if you understand the results.