Thread Flip Flop OP und Perl Version (14 answers)
Opened by mark05 at 2026-04-14 07:46

mark05
 2026-04-14 07:46
#197483 #197483
User since
2010-01-05
142 Artikel
BenutzerIn
[default_avatar]
hi

mal wieder ich ;)

Folgende Situation:

Produktionssystem Perl 5.26
Entwicklersystem Perl 5.38


es wird folgendes geparsed
Code: (dl )
1
2
3
PATH=/usr/lib/sysstat:/usr/sbin:/usr/sbin:/usr/bin:/sbin:/bin

*/2 * * * * root \&test1 , { after_job => \&sync , };


die dazu gehörige code Zeile

Code: (dl )
1
2
3
4
5
6
if ( $r =~ /[,]\s*?[{]/smx .. $r =~ /[}]\s*[;]\s*$/smx ) {
push @{$rawdata{$l}},$r;
if ( $OLD_PERL_VERSION > '5.026' ) {
next;
}
}


Der Grund für die Version abfrage ist das perl 5.26 beim
Flip Flop kein "next" benötigt , 5.38 schon.

Warum ?

ich hätte hier ein gleiches verhalten erwartet !

Wenn ich das "next" bei der 5.26 ausführen lasse liesst
er die Datei mit den "crontab" einträgen nicht komplett ein.


das "next" ist für die whileschleife von Datei Open.

Holger

p.s. perl 5.26 verhält sich nicht so. desweigen die versions abfrage
Last edited: 2026-04-15 11:30:25 +0200 (CEST)

View full thread Flip Flop OP und Perl Version