Implementation of LZ77 data compression algorithm in perl