чо те именно не понятно какие строчки?
весь скрипт те ни кто не будет объяснять иди учи perl