use Fcntl qw(:flock)­;

##</code><code>##

use Fcntl qw< LOCK_EX SEEK_END >;