Мне нужно понять, как работает эта конкретная программа. Кажется, это довольно сложно, не могли бы вы посмотреть, не могли бы вы помочь мне понять, что делает эта программа на Perl, я новичок, поэтому вряд ли могу понять, что происходит в код, приведенный по следующей ссылке ниже, высоко ценит любые указания или идеи относительно этой программы. Спасибо...:)
Эта программа называется premove.pl.c
Это связано с еще одной программой premove.pl,
Его код выглядит так:
#!perl
open (newdata,">newdata.txt")
|| die("cant create new file\n");#create passwd file
$linedata = "";
while($line=<>){
chomp($line);
#chop($line);
print newdata $line."\n";
}
close(newdata);
close(olddata);
__END__
Я даже не уверен, как запустить две программы, упомянутые здесь. Интересно также, что означает расширение первой программы, так как оно имеет расширение "pl.c", пожалуйста, дайте мне знать, если вы знаете, что это может означать. Мне нужно понять это как можно скорее, поэтому я пишу этот вопрос, мне не хватает времени, иначе я бы попытался сам в этом разобраться. Кажется, это сложная программа для начинающего, как я, надеюсь, вы понимаете. Еще раз спасибо за ваше время.