diff --git a/stackcollapse-pmc.pl b/stackcollapse-pmc.pl
index c78fb96c..5bd7c2da 100755
--- a/stackcollapse-pmc.pl
+++ b/stackcollapse-pmc.pl
@@ -59,7 +59,7 @@
 my $prev_count;
 my $prev_indent = -1;
 
-foreach (<>) {
+while (defined($_ = <>)) {
 	if (m/^( *)[0-9.]+%  \[([0-9]+)\]\s*(\S+)/) {
 		my $indent = length($1);
 		if ($indent <= $prev_indent) {