# Global color definition # #39dff7 ffffff 00000000 80CCF8 68A4C8 008dfd 008dfd 1014e8 *mehr* \"*mehr*\" # Page footer #
© Infodrom Oldenburg, <: @months = # ("Jan","Feb","Mar","Apr","May","Jun","Jul","Aug","Sep","Oct","Nov","Dec"); ("Dummy", "Januar","Februar","März","April","Mai","Juni","Juli","August","September","Oktober","November","Dezember"); #($date_sec,$date_min,$date_hour,$date_mday,$date_mon,$date_year,$date_wday,$date_isdst) # = localtime(); $date_year += 1900; #printf "%d %s %d", $date_mday, $months[$date_mon], $date_year; "" =~ /^(\d+)-(\d+)-(\d+)\s/; printf "Last modified: %d. %s %d", $1, $months[$2], $3; :>
 # ========== Abstand berechnen ========== # in ePerl: $root_prefix # in WML: <: $root_prefix = ""; $root_prefix =~ s/^.*src\/?(.*)$/$1/; @foo = split (/\//, $root_prefix); $root_prefix = "../"x($#foo+1); :> > <: print "$root_prefix"; :> <: $root_var = "" :>>