open O, ">a.bin";
binmode O;
print O "Hello World!";
close O;

link "a.bin", "b.bin";

open L, ">b.bin";
binmode L;
print L "Bye World!";
close L;

open O, "a.bin";
print while ( <O> );
close O;

# prints "Bye World!"