Wären aus Perl ein paar Funktionen rausgeflogen, dann wäre DAS vielleicht nicht möglich.
Welche denn?
Beginnen wir "ganz BASIC" mit
- open()
Das verführt zu etwas wie open($FH, ">$file");
Nur ist eben in Linux jedes Zeichen außer NUL, also auch das '>'-Zeichen in Dateinamen erlaubt. Mit der Folge, dass mit $file = '>inputdatei' etwas wie
open($FH, ">>inputdatei");
herauskommt.
Meine Antwort: IO::File
OOP:
use IO::File;
my $file = "moin";
my $fh = IO::File->new();
$fh->open($file, O_RDWR|O_CREAT|O_TRUNC) or die $!;
$fh->print("Moin");
$fh->close;
und das seit v5.6 (Jahr 2000). Also wer IO::File
und die damit importierten Konstanten nicht nutzt, der hat seit 18 Jahren die Zeit verpennt.
perldoc IO::File
MfG