Сохранение данных в файл при нажатии кнопки отправки

Question

Я написал скрипт CGI-Perl, который запускает удаленную команду в ящике памяти и сохраняет вывод в массиве. Я хочу сохранить данные массива в файл на сервере, который пользователь нажимает кнопку «Отправить» и перенаправляется на следующую страницу.

Как это сделать?

Answer 1

Начните с наименования файлов по дате. Даты отлично подходят для имен файлов. Возможно, добавьте расширение .txt. Откройте файл для этого имени. Распечатайте дескриптор файла.

Ниже приводится приблизительное приближение того, как оно будет выглядеть. Синтаксис может немного отличаться:

my $filename = time() . ".txt"; #something like 234242342352.txt 
open my $fh, ">", $filename or die "Could not write to $filename"; 
print $fh @array_data; #this assumes your array still has newline characters 

Я не уверен, как будет работать следующая страница.