perlvarよく読め。

$/をundefにするとeofまで読む。
$/に整数のリファレンスを入れるとその整数のサイズまで読む