[adamm@pepsi java_vs_perl]$ javac X.java 
[adamm@pepsi java_vs_perl]$ dd if=/dev/zero of=ten_meg_file__2.txt seek=10 count=1 bs=1M
1+0 records in
1+0 records out
[adamm@pepsi java_vs_perl]$ java X ten_meg_file__2.txt out__2
Time = 1205
Buf Time = 815
[adamm@pepsi java_vs_perl]$ java X ten_meg_file__2.txt out__2
Time = 722
Buf Time = 838
[adamm@pepsi java_vs_perl]$ java X ten_meg_file__2.txt out__2
Time = 814
Buf Time = 779