|
Thread Flip Flop OP und Perl Version
(14 answers)
Opened by mark05 at 2026-04-14 07:46
Am Besten Du beschreibst mal was Du überhaupt machen willst. Gehst Du zeilenweise durch die Datei oder Zeichenweise?
Und das wäre nur eine von vielen Fragen die ich zu Deinem Vorhaben hätte ;) Also, um diese Zeilen rauszufischen: Code: (dl
)
1 */2 * * * * root test2.sh , {würde ich zeilenweise lesen Flip => { und Flop => }. Die Zeile */2 * * * * root \&test1 , { after_job => \&sync , }; kriegst Du damit aber auch. Code (perl): (dl
)
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 while( <DATA> ){ if( /{/ .. /}/){ print $_; } } __DATA__ PATH=/usr/lib/sysstat:/usr/sbin:/usr/sbin:/usr/bin:/sbin:/bin */2 * * * * root test2.sh , { sub => \&test2, arguments => test2 opt, loadcheck => 2, execwhile => 3, catch => 1, after_job => test2_after_job.sh, }; */2 * * * * root \&test1 , { after_job => \&sync , }; Ob das jedoch alle Deine Fälle abdeckt, kann ich nicht beurteilen. Ansonsten sieht das alles sehr danach aus, als würde nach Deinem Parser ein eval die in der crontab notieren Schweifies in Hashreferenzen umwandeln wollen. Das ist ziemlich dilettantisch ;) Last edited: 2026-04-15 15:51:12 +0200 (CEST) |