Skript per Konsole gestartet? (Allgemeines zu Perl)

[thread]8320[/thread]

Skript per Konsole gestartet?

nepos

2006-09-12 16:17

User since
2005-08-17
1420 Artikel
BenutzerIn

Hallo zusammen!

Gibt es eine einfache Moeglichkeit, herauszufinden, ob ein Skript per Konsole gestartet wurde oder z.B. als Cron-Job aufgerufen wurde?
Danke euch!

Ciao,
Nepos

2006-09-12 17:39

User since
2003-08-04
12209 Artikel
Admin1

das sollte gehn:
print "terminal" if -t STDOUT;
perldoc -f -X

Always code as if the guy who ends up maintaining your code will be a violent psychopath who knows where you live. -- Damian Conway in "Perl Best Practices"
lesen: Wiki:

Wie frage ich & perlintro Wiki:

brian's Leitfaden für jedes Perl-Problem

Dubu

2006-09-12 21:50

User since
2003-08-04
2145 Artikel
ModeratorIn + EditorIn

user image

Vorsicht, schon eine Pipe ist etwas anderes als ein Terminal!

Code: (dl )

$ perl -le 'print (-t STDOUT ? "Yes" : "No")'
Yes
$ perl -le 'print (-t STDOUT ? "Yes" : "No")'  | cat
No

nepos

2006-09-13 10:53

User since
2005-08-17
1420 Artikel
BenutzerIn

Hm ok, muss ich mir mal angucken.
Ich wollt da eventuell mal Skripten bisschen erweitern, die normal per Cron laufen, so dass man auf der Konsole bisschen mehr Ausgaben erhaelt, wenns denn per Konsole gestartet wird (so ne Art Fortschrittsanzeige z.B.).

Dubu

2006-09-13 11:47

User since
2003-08-04
2145 Artikel
ModeratorIn + EditorIn

user image

Ja, dafür ist die Abfrage mit -t ideal. In eine Pipe möchte man eine Fortschrittsanzeige ja auch nicht stecken. ;)

nepos

2006-09-13 12:59

User since
2005-08-17
1420 Artikel
BenutzerIn

Danke euch :)
Werde mich dann mal mit CPAN:

Term::ProgressBar bisschen spielen...

View all threads created 2006-09-12 16:17.