[DOS-Batch] Berechneten Zeitraum in Batch einsetzen (sonstige Sprachen, auch PHP)

[thread]17723[/thread]

[DOS-Batch] Berechneten Zeitraum in Batch einsetzen

Leser: 22

Articles: hide open all | hide show old branches

+37 replies
Gast Frederick

2012-09-02 14:26

Hallo,

ich habe hier eine Batchdatei die ein Kommandozeilenprogramm unter Windows 7 64-Bit steuert. Die Batchdatei enthält eine Sekundenangabe, die ich leider immer manuell einsetzen muss. Ich wollte das gerne berechnen und automatisch einsetzen lassen. Ich kann selber nicht programmieren, hab aber schon für diverse Zwecke einfache Skripte per Google gefunden - hierfür leider nicht. Es gibt zwar Skripte die einen Zeitraum in Tagen ausrechnen können, aber hier musste alles manuell eingesetzt werden oder das Skript konnte die Ausgabe nicht in eine Batch-Zeile schreiben.

Was gemacht werden müsste
1. vergangene Zeit (in Sekunden) ab einem Zeitpunkt X (z. B. 14.10.2011, 13:00 Uhr) zum aktuellen Zeitpunkt berechnen
2. das Ergebnis in an eine bestimmte Stelle der Batch einfügen
3. Ausführen der Batch

Evtl. kann man z. B. ein Perl-Skript erstellen, welches den Zeitraum berechnet, an eine bestimmte Stelle der Batch einfügt und die Batch dann startet?

Grüße
Frederick
Last edited: 2012-09-02 14:27:55 +0200 (CEST)
- +2 replies
- Gast gast2
  
  2012-09-02 16:49
  1. mit Perl skript datumsdifferenz berechnen und in datei datumsdiff.txt
  schreiben
  2. in batch folgenden befehl zum einlesen in variable verwenden:
  set
  
  Code: (dl )
  
  /p DATUMSDIFF=<datumsdiff.txt
  
  3. in batchdatei %DATUMSDIFF% verwenden
  Last edited: 2012-09-02 16:51:16 +0200 (CEST)
  - Gast gast2
    
    2012-09-02 17:00
    da ist irgendwas beim posten verloren gegangen.
    
    Code: (dl )
    
    set /p DATUMSDIFF=<datumsdiff.txt
    
    muss es korrekt heißen.
    Last edited: 2012-09-02 17:07:49 +0200 (CEST)
- +7 replies
- Rone
  
  2012-09-02 16:52
  
  User since
  2008-06-20
  11 Artikel
  BenutzerIn
  
  Date::Calc (http://search.cpan.org/~stbey/Date-Calc-6.3/lib/Da...) kommt hier in Frage, oder ein vergleichbares Modul.
  - +6 replies
  - Gast Frederick
    
    2012-09-02 17:21
    
    Was müsste ich denn bei Date::Calc eintragen, damit er die Diffrenez zwischen einem Zeitpunkt X und heute berechnet? Ich hab mir mal eine Anleitung (http://guest.engelschall.com/~sb/download/Date-Cal...) angesehen, das ist für mich etwas der Overkill an Info-Input.
    Last edited: 2012-09-02 17:31:25 +0200 (CEST)
    - +5 replies
    - Rone
      
      2012-09-02 20:01
      
      User since
      2008-06-20
      11 Artikel
      BenutzerIn
      
      Für den Abstand in Sekunden:
      
      Code (perl): (dl )
      
      1 2 3 4 5 6 7 8 9 10 11 12
      
      #!/usr/bin/perl use strict; use warnings; use Data::Dumper; use Date::Calc qw/Mktime/; my $t1 = Mktime(2012,9,2, 19,58,0); my $t2 = Mktime(2012,9,1, 20,0,0); my $diff = $t1-$t2; print $diff . "\n";
      
      mit Verwendung der 'aktuellen' Zeit: (nur Ausschnitt)
      
      Code (perl): (dl )
      
      1 2 3
      
      my $t1 = time(); my $t2 = Mktime(2012,9,1, 20,0,0); my $diff = $t1-$t2;
      
      Last edited: 2012-09-02 20:02:41 +0200 (CEST)
      - +4 replies
      - Gast Frederick
        
        2012-09-03 11:32
        
        Das Skript gibt aber nichts in eine Datei aus wie es oben geschrieben wurde, oder?
        Last edited: 2012-09-03 11:39:54 +0200 (CEST)
        
        GUIfreund
        
        2012-09-03 13:02
        
        User since
        2011-08-08
        559 Artikel
        BenutzerIn
        
        Guest Frederick
        Das Skript gibt aber nichts in eine Datei aus wie es oben geschrieben wurde, oder?
        
        Du könntest die Differenz als Parameter an dein Batch-Skript übergeben, dann brauchst du nichts zwischenzuspeichern.
        Gruß
        GUIfreund
        
        +2 replies
        
        Rone
        
        2012-09-03 14:31
        
        User since
        2008-06-20
        11 Artikel
        BenutzerIn
        
        da gibt es viele Möglichkeiten: Die Batchdatei als HERE-Doc im Perl-Skript unterbringen und bedarfsweise eine temporäre Batchdatei erzeugen und per qx ausführen; oder das Perl-Skript aus der Batch heraus aufrufen und eine Umgebungsvariable setzen lassen, oder ...
        
        Was hasst du den schon probiert?
        
        Gast Frederick
        
        2012-09-03 14:59
        
        Am günstigsten wäre es alles in einem Skript zu haben.
        
        Versuchen konnte ich bisher nichts, da ich nicht weiß wie man die Batch und das Perl-Skript "zusammen" bekommt.
        Last edited: 2012-09-03 15:02:42 +0200 (CEST)
- +4 replies
- Gast Gast_
  
  2012-09-02 16:56
  
  kannst du auch PowerShell verwenden?
  Last edited: 2012-09-02 16:57:11 +0200 (CEST)
  - +3 replies
  - Gast gast
    
    2012-09-02 17:35
    Powershell:
    
    Code: (dl )
    
    1 2 3 4
    
    $dateinput = read-host "Datum:" $then = [dateTime]::Parse($dateinput) $now = [dateTime]::Now ($then - $now).Seconds
    
    Last edited: 2012-09-02 17:40:19 +0200 (CEST)
    - +2 replies
    - Gast Frederick
      
      2012-09-03 11:31
      
      Grds. könnte ich auch Powershell verwenden, nur hab ich davon noch weniger Ahnung als von Batch. Noch nie genutzt,
      Last edited: 2012-09-03 11:39:45 +0200 (CEST)
      - Gast gast2
        
        2012-09-04 19:02
        
        wenn du dich einlesen moechtest:
        http://www.linux-magazin.de/Heft-Abo/Ausgaben/2006...
        http://powershell.com/cs/blogs/ebookv2/default.asp...
        
        http://technet.microsoft.com/de-de/scriptcenter/po...
        http://www.it-visions.de/scripting/powershell/powe...
        http://de.wikipedia.org/wiki/Windows_PowerShell
        Last edited: 2012-09-04 19:06:12 +0200 (CEST)
- +3 replies
- Raubtier
  
  2012-09-03 11:35
  
  User since
  2012-05-04
  1054 Artikel
  BenutzerIn
  
  Müssen Schaltsekunden gesondert behandelt werden? Wie soll mit Zeitumstellungen (Sommer/Winter) umgegangen werden?
  - +2 replies
  - Gast Fredrick
    
    2012-09-03 15:00
    
    Nein, muss nicht sekundengenau sein. Auch die eine Stunde Zeitumstellung spielt keine Rolle. Die notwendige Einheit ist nur Sekunde.
    Last edited: 2012-09-03 15:02:58 +0200 (CEST)
    - Raubtier
      
      2012-09-03 19:41
      
      User since
      2012-05-04
      1054 Artikel
      BenutzerIn
      
      Hm, auf jeden Fall schlage ich DateTime als Modul vor.
      
      Code vielleicht so:
      
      Code: (dl )
      
      1 2 3 4 5 6 7
      
      use Modern::Perl; use DateTime; my $past = DateTime->new(year => 2012, month => 9, day => 3, hour => 19, minute => 39, time_zone => 'Europe/Berlin'); my $jetzt = DateTime->now(); my $delta = $jetzt->subtract_datetime_absolute($past); say $delta->in_units( 'seconds' );
- +20 replies
- Gast gast2
  
  2012-09-03 19:09
  
  alles in Perl schreiben und dann aus dem programm mit pl2bat eine batchdatei erzeugen.
  dann haste das theater mit den unfaehigkeiten von cmd.exe bzw. command.exe nicht.
  Last edited: 2012-09-03 19:25:11 +0200 (CEST)
  - +19 replies
  - Gast Frederick
    
    2012-09-04 10:52
    
    Möglichkeiten wurden jetzt genug gepostet. Ein Perl-Skript mit Date::Time, ein Perl-Skript mit Date::Calc und ein Powershell-Skript. Sicher funktionieren alle Skripte wie sie sollen, nur bekomme ich das Ergebnis nicht in eine Batch geschrieben.
    
    Was mir jetzt noch fehlt, ist eine Möglichkeit das Ergebnis in eine Batch zu bringen.
    
    Ich hab mal etwas nach dem Thema gegoogelt, aber so richtig weiter gekommen bin ich da leider nicht.
    Last edited: 2012-09-04 11:04:46 +0200 (CEST)
    - +7 replies
    - Relais
      
      2012-09-04 11:05
      
      User since
      2003-08-06
      2244 Artikel
      ModeratorIn
      
      Geht es Dir darum, wie man in eine Datei schreibt?
      Erst denken, dann posten --
      26. Deutscher Perl- u. Raku -Workshop 15. bis 17.04.2024 in Frankfurt/M.
      
      Winter is Coming
      - +6 replies
      - Gast Frederick
        
        2012-09-04 11:25
        
        Es soll einfach das Ergebnis der Berechnung an eine bestimmte Stelle in einer bestehenden Batch eingefügt und die Batch gestartet werden. Wie, ist dabei egal.
        Last edited: 2012-09-04 11:28:09 +0200 (CEST)
        
        Linuxer
        
        2012-09-04 11:30
        
        User since
        2006-01-27
        3870 Artikel
        HausmeisterIn
        
        Und woran machst Du diese bestimmte Stelle fest?
        Woran soll das Skript erkennen, wo es die Daten hinschreiben soll?
        Sollen bestehende Daten überschrieben werden, soll etwas eingefügt werden?
        
        Liefer Doch einfach mal mehr Informationen und idealerweise Beispieldaten.
        
        Allgemeiner Vorschlag: Verwende Tie::File und http://search.cpan.org/~rjbs/perl-5.16.1/pod/perlo...
        meine Beiträge: I.d.R. alle Angaben ohne Gewähr und auf Linux abgestimmt!
        Die Sprache heisst Perl, nicht PERL. - Bitte Crossposts als solche kenntlich machen!
        
        +4 replies
        
        bianca
        
        2012-09-04 12:43
        
        User since
        2009-09-13
        6977 Artikel
        BenutzerIn
        
        Guest Frederick
        Es soll einfach das Ergebnis der Berechnung an eine bestimmte Stelle in einer bestehenden Batch eingefügt und die Batch gestartet werden. Wie, ist dabei egal.
        
        So herum wird das m.E. schonmal garnicht gehen, weil du einen Wert nicht an einen nicht laufenden Prozess übergeben kannst.
        Der Batch müsste das Script aufrufen und den Rückgabewert für die weitere Bearbeitung in einer Variable speichern.
        Aber mit Standard Windows Batch geht das nicht.
        
        Oder man startet mit Perl den Batch und übergibt das Datum als Parameter in den Aufruf. Im Batch dann mit %1 übernehmen.
        http://www.robvanderwoude.com/parameters.php
        
        Edit:
        Oder ganz verwegen: Du schreibst mit Perl einfach die ganze Batch neu (oder liest sie zumindest ein und setzt an einen Platzhalter dein Datum) und startest sie dann. Dann kannst du natürlich in den Quellcode einsetzen, was du willst.
        Last edited: 2012-09-04 12:46:33 +0200 (CEST)
        10 print "Hallo"
        20 goto 10
        
        +3 replies
        
        Raubtier
        
        2012-09-04 14:44
        
        User since
        2012-05-04
        1054 Artikel
        BenutzerIn
        
        2012-09-04T10:43:39 bianca
        So herum wird das m.E. schonmal garnicht gehen, weil du einen Wert nicht an einen nicht laufenden Prozess übergeben kannst.
        Der Batch müsste das Script aufrufen und den Rückgabewert für die weitere Bearbeitung in einer Variable speichern.
        Aber mit Standard Windows Batch geht das nicht.
        
        Nicht? Kann man nicht einfach %ERRORLEVEL% auslesen? Schon hat man den Rückgabewert. Wenn du mit Rückgabewert die Ausgabe meinst, den bekommt man auch. for /? sagt mir unter anderem:
        
        Quote
        FOR /F ["options"] %variable IN (`command`) DO command [command-parameters]
        
        (ok, "if usebackq option present") :-)
        
        bianca
        
        2012-09-04 15:03
        
        User since
        2009-09-13
        6977 Artikel
        BenutzerIn
        
        2012-09-04T12:44:15 Raubtier
        Nicht? Kann man nicht einfach %ERRORLEVEL% auslesen?
        
        Klar geht das alles.
        Meine Aussage bezog sich exakt auf
        
        Guest Frederick
        Es soll einfach das Ergebnis der Berechnung an eine bestimmte Stelle in einer bestehenden Batch eingefügt und die Batch gestartet werden. Wie, ist dabei egal.
        
        Er schreibt hier, dass er einen Wert in einen bestehenden Batch einfügen will der noch nicht gestartet ist.
        Das geht m.E. nur, wenn das Perlscript den Batch einliest, den Wert an einem definierten Platzhalter einfügt und den Batch dann neu schreibt und startet. %ERRORLEVEL% ist ja flüchtig. Aber die Idee ist gut. Einfach in eine Umgebungsvariable der Eingabeaufforderung speichern. Ja, das sollte klappen. Ich bin jetzt nur nicht sicher, ob der Batchprozess auf die Umgebungsvariablen des Perlprozesses zugreifen kann. Da war mal was, dass die Variablen irgendwie beschränkt waren. Ich kriegs nicht mehr vollständig zusammen, müsste man testen.
        Aber inzwischen wissen wir ja, das der OP garnicht programmieren kann. Von daher nützen die Ideen nichts, er will fertigen Code haben.
        10 print "Hallo"
        20 goto 10
        
        Gast wer
        
        2012-09-04 15:55
        
        delta.pl
        
        Code (perl): (dl )
        
        1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25
        
        #!/usr/bin/perl use strict; use warnings; use DateTime; #InputFormat: JJJJ.MM.DD-HH:MM:SS my $date=shift(@ARGV) // '2005.02.25-00:00:00'; my @date=$date=~/^\s*(\d{,4})\.(\d{,2})\.(\d{,2})(?:-(\d{,2}):(\d{,2}):(\d{,2}))$/; push(@date,0)while(@date<6); $date[0]+=1900 if(length($date[0])<3); $date[1]=1 if($date[1]<1); $date[2]=1 if($date[2]<1); my $past = DateTime->new( year => shift(@date), month => shift(@date), day => shift(@date), hour => shift(@date), minute => shift(@date), time_zone => 'Europe/Berlin', ); my $jetzt = DateTime->now(); my $delta = $jetzt->subtract_datetime_absolute($past); print $delta->in_units( 'seconds' );
        
        batch:
        
        Code: (dl )
        
        1 2 3
        
        SET diff=0 FOR /F "options" %%I IN (`perl delta.pl -- 2010:10:10-10.10.10`) DO SET diff=%%I "C:\Program Files\VirtualBox\VBoxManage.exe" modifyvm "Beta-VM" --biossystemtimeoffset %diff%
        
        Last edited: 2012-09-04 16:02:38 +0200 (CEST)
    - +11 replies
    - GUIfreund
      
      2012-09-04 12:52
      
      User since
      2011-08-08
      559 Artikel
      BenutzerIn
      
      Guest Frederick
      Was mir jetzt noch fehlt, ist eine Möglichkeit das Ergebnis in eine Batch zu bringen.
      
      Hier noch einmal mein Vorschlag aus msg #161570 etwas ausführlicher:
      
      Schritt 1: Deine Batch aus dem Perl-Skript heraus starten und dabei die Differenz als Parameter übergeben.
      Schritt 2: Die Batch benutzt den übergebenen Parameter an der Stelle, wo die Differenz benötigt wird.
      
      Wenn du damit Probleme hast, so schreibe doch bitte etwas genauer, wo es noch hakt.
      Gruß
      GUIfreund
      - +10 replies
      - Gast Fredrick
        
        2012-09-04 13:36
        
        Es hakt daran, dass ich nicht programmieren kann und mir meine Batch-Skripte die ich nutze meist ergoogelt habe. Für ganz primitive Batch-Dateien reicht das, aber schon bei Variablen scheitert es.
        
        Beispiel:
        Ich möchte über eine Batch-Datei das Datum einer virtuellen Maschine (VirtualBox) zurücksetzen. Grund: Ich nutze in der VM 2 Programme im Beta-Status, bei denen die Entwickler einige Funktionen wegen Instabilität wieder raus genommen haben, die ich aber gerne hätte und die halbwegs laufen. Beide Betas laufen aber ab einem bestimmten Datum nicht mehr.
        
        Die Zeile in der Batch sieht so aus:
        
        Code: (dl )
        
        "C:\Program Files\VirtualBox\VBoxManage.exe" modifyvm "Beta-VM" --biossystemtimeoffset -27993600000
        
        Die Zahl ist die Differenz zum Datum als die VM erstellt wurde in ms (so genau muss es nicht sein, auf den Tag genau reicht). An dieser Stelle soll jetzt die Differenz zwischen "heute" und einem bestimmten Tag eingetragen werden.
        Last edited: 2012-09-04 13:41:46 +0200 (CEST)
        
        bianca
        
        2012-09-04 14:42
        
        User since
        2009-09-13
        6977 Artikel
        BenutzerIn
        
        Guest Fredrick
        Es hakt daran, dass ich nicht programmieren kann
        
        Dann setz die Anfrage ins Unterforum Jobangebote. Das ist dann ja keine Frage mehr.
        10 print "Hallo"
        20 goto 10
        
        +6 replies
        
        murphy
        
        2012-09-04 15:16
        
        User since
        2004-07-19
        1776 Artikel
        HausmeisterIn
        
        Es wirkt irgendwie umständlich auf mich, für dieses eine Kommando extra eine Batchdatei zu erzeugen. Stattdessen könnte man den Befehl doch genausogut aus Perl heraus absetzen. Ungetestetes Beispiel:
        
        Code (perl): (dl )
        
        1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16
        
        use 5.012; use warnings; use POSIX qw(mktime difftime); use constant { VBoxManage => 'C:\Program Files\VirtualBox\VBoxManage.exe', # Enter correct date here, example is 1913-12-11 14:15:16 UTC reftime => mktime(16, 15, 14, 11, 12, 1913) }; my $delta = difftime(time, reftime); if (system(VBoxManage, 'modifyvm', 'Beta-VM', '--biossystemtimeoffset', $delta) != 0) { die "Failed to run VBox management command"; }
        
        When C++ is your hammer, every problem looks like your thumb.
        
        +5 replies
        
        Gast Fredrick
        
        2012-09-04 16:37
        
        Da kommt
        
        Quote
        Use of uninitialized value in subroutine entry at E:\neu.pl line 12.
        
        @ Bianca
        
        Nein, das Thema wurde aber oft gefragt, leider gab es nie eine richtige Antwort. Seit einiger Zeit ist für den VBoxmanager eine GUI angekündigt, mit der solche Sachen einfacher sein sollen - bisher aber nichts veröffentlicht.
        Last edited: 2012-09-04 16:43:27 +0200 (CEST)
        
        +2 replies
        
        Gast Frederick
        
        2012-09-04 16:51
        
        Gerade gesehen, dass im Verzeichnis im dem das Perl-Skript liegt jetzt eine Datei namens "mktime(16" vorhanden ist.
        Last edited: 2012-09-04 16:53:39 +0200 (CEST)
        
        murphy
        
        2012-09-04 17:52
        
        User since
        2004-07-19
        1776 Artikel
        HausmeisterIn
        
        Ausgesprochen merkwürdig. Klingt fast so, als würdest Du das Programm nicht mit Perl sondern mit einer Shell ausführen %-]
        When C++ is your hammer, every problem looks like your thumb.
        
        +2 replies
        
        murphy
        
        2012-09-04 17:51
        
        User since
        2004-07-19
        1776 Artikel
        HausmeisterIn
        
        Guest Fredrick
        Da kommt
        
        Quote
        Use of uninitialized value in subroutine entry at E:\neu.pl line 12.
        
        [...]
        
        Das kann ich nicht reproduzieren. Bei mir funktioniert der Code.
        
        Du kannst natürlich mal versuchen, den Aufruf von mktime direkt in Zeile 12 einzufügen anstatt eine Konstantendefinition zu verwenden.
        When C++ is your hammer, every problem looks like your thumb.
        
        Gast Frederick
        
        2012-09-04 18:42
        
        Ich hatte zuerst das Skript einfach durch Doppelklick ausgeführt, die Meldung war aber zu schnell wieder weg. Daher nochmal in über cmd - vermutlich wurde da die Datei geschrieben. Wenn man aber schnell ist, sieht man die gleiche Meldung auch wenn man das skript über Doppelklick startet.
        
        +2 replies
        
        bianca
        
        2012-09-04 15:45
        
        User since
        2009-09-13
        6977 Artikel
        BenutzerIn
        
        Kommt mir übrigens sehr bekannt vor, habe den alten Thread mal rausgesucht: Datum in Batch-Datei einfügen
        
        Gehört ihr irgendwie zusammen?
        10 print "Hallo"
        20 goto 10
        
        Relais
        
        2012-09-04 16:56
        
        User since
        2003-08-06
        2244 Artikel
        ModeratorIn
        
        @bianca: Sehr aufmerksam von Dir.
        Erst denken, dann posten --
        26. Deutscher Perl- u. Raku -Workshop 15. bis 17.04.2024 in Frankfurt/M.
        
        Winter is Coming

View all threads created 2012-09-02 14:26.