Τοποθετώντας δεδομένα σε καινούρια αρχεία

Πολλές φορές αντί να αποθηκεύσουμε κάτι σε ένα ήδη υπάρχον αρχείο προτιμούμε να δημιουργήσουμε ένα νέο. Ας δούμε πώς θα γίνει αυτό στην Perl.

my $content = 'κάποια δεδομένα';

my $sample_time = time();

open (NEWFILE, ">$sample_time.txt") or die "can't create file $!";

print NEWFILE "$content";

close (NEWFILE);

Τρέχουσα Ενότητα: Perl

Φιλικά - συνεργαζόμενα sites: Left Handed Products