diff --git a/egs/wsj/s5/utils/create_data_link.pl b/egs/wsj/s5/utils/create_data_link.pl
index 40c17487310..850f29f068c 100755
--- a/egs/wsj/s5/utils/create_data_link.pl
+++ b/egs/wsj/s5/utils/create_data_link.pl
@@ -79,7 +79,7 @@ sub GetGCD {
 
 # Second, get the coprime list.
 my @coprimes;
-for (my $n = 1; $n < $num_storage; $n++) {
+for (my $n = 1; $n <= $num_storage; $n++) {
   if (GetGCD($n, $num_storage) == 1) {
     push(@coprimes, $n);
   }