[0] Perl> open I, '<:raw', '32GB.dat.bz2';;
[0] Perl> read( I, $c, 2147483648 );;
[Negative length at (eval 4) line 1, <STDIN> line 2.
] Perl> read( I, $c, 2147483647 );;