Subroutine Variablenübergabe - #170106 (Allgemeines zu Perl)

bianca

2013-09-11 11:04

User since
2009-09-13
6993 Artikel
BenutzerIn

user image

In Perl schreibt man es so:

Code (perl): (dl )

sub zeit{
my @date = localtime(time);
my $jahr = $date[5]+1900;
my $monat = $date[4]+1;
"$jahr$monat$date[3]$date[2]$date[1]$date[0]";
}

Code (perl): (dl )

open(SPEICHGANSBUCH,'>',"$directorySpeicherdatei/U20130306G1_".zeit().'.txt') or die "Speicherdatei BUCH nicht gefunden";

Last edited: 2013-09-11 11:06:26 +0200 (CEST)

10 print "Hallo"
20 goto 10