Linux module-Befehl mit Perl-Script (Allgemeines zu Perl)

[thread]17702[/thread]

Linux module-Befehl mit Perl-Script

Tags: perl5 befehl module module nicht gefunden Ähnliche Threads

Leser: 23

Articles: hide open all | hide show old branches

+15 replies
zocker76

2012-08-27 13:04

User since
2012-08-27
8 Artikel
BenutzerIn

Hi alle zusammen,

Ich brauche für mein Perl-Projekt einen Texteditor, der sich aus der Konsole aus öffnet.
Das funktioniert auch mit zB. system("gedit datei1.txt");

Das Problem ist, dass ich vorher ein Modul laden muss, und zwar "module load freeware".
Der module-Befehl funktioniert problemlos, wenn ich ihn händisch in die Konsole eintippe, aber nicht mit automatisch mit system("module load freeware"); , er zeigt nur an, dass er das Modul freeware nicht findet.

Könnt ihr mir bitte helfen :(
LG
Last edited: 2012-08-27 13:05:36 +0200 (CEST)
- Gast gast
  
  2012-08-27 13:36
  
  kompletten pfad bei module angeben.
  Last edited: 2012-08-27 13:37:46 +0200 (CEST)
- +2 replies
- zocker76
  
  2012-08-27 13:45
  
  User since
  2012-08-27
  8 Artikel
  BenutzerIn
  
  Es wäre wirklich eilig!
  
  Es tut mir auch leid wegen meiner Rechtschreibung und meiner Grammatik.
  -> Der Edit-Button funktioniert bei mir (noch) nicht.
  - pq
    
    2012-08-27 14:02
    
    User since
    2003-08-04
    12208 Artikel
    Admin1
    
    bitte keine doppelposts. habe jetzt 2 duplikate entfernt. einmal reicht völlig, auch wenn es noch so eilig ist. das hier ist kein bezahlter helpdesk =)
    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: Wie frage ich & perlintro brian's Leitfaden für jedes Perl-Problem
- gelöscht 2012-08-27 13:51
- +8 replies
- Linuxer
  
  2012-08-27 13:59
  User since
  2006-01-27
  3870 Artikel
  HausmeisterIn
  Ich hab's versucht, aber leider:
  
  Code: (dl )
  
  1 2
  
  $ cat /dev/crystalball cat: /dev/crystalball: No such file or directory
  
  Nur eine wilde Vermutung, da die Kristallkugel kaputt ist:
  
  Das Kommando module (was auch immer das treibt) scheint er ja zu kennen.
  
  Vielleicht wird in einer Umgebungsvariable definiert, wo die Module gesucht werden sollen.
  Wenn diese nicht im Skript existiert, können die Module nicht gefunden werden ...
  Vergleiche doch mal die Umgebungsvariablen der aktiven Shell (wo es funktioniert) mit denen, die im Skript vorhanden sind...
  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!
  - +7 replies
  - zocker76
    
    2012-08-27 14:12
    User since
    2012-08-27
    8 Artikel
    BenutzerIn
    
    Hm kompletter Pfad bei module?
    
    Ich kenne den Pfad nicht und weiß jetzt nicht genau wie ich den Pfad übergeben soll.
    
    Die Umgebungsvariablen habe ich mir angesehen, aber ich kann nichts erkennen:
    
    Code: (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 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43
    
    COLORS /etc/DIR_COLORS.xterm NAMESERVICE LDAP SEQ1 ^[]2; SEQ2 ^G^[]1; SEQ3 ^G UMASK 7 _ clear addsuffix argv () cdpath () cshrc /opt/iremGL4iw_6.0m1/etc/cshrc.IremGL cwd /home/sense3d/mcp_oa/nodm/default dirstack /home/sense3d/mcp_oa/nodm/default echo_style both edit file /home/.i18n filec gid 29538 group ifxuser headbase vihlc639: history 40 home /home ignoreeof killring 30 lcd () modules_shell tcsh noclobber owd /home/sense3d/mcp_oa/nodm/default path (/usr/lib64/qt-3.3/bin /home/sense3d/mcp_oa/nodm/default/bin /opt/iremGL4iw_6.0m1/bin /opt/r2g4iw_6.0fp2/bin /opt/Df2FP4iw_6.0fp2/bin /opt/codesign_3.1.2/bin /opt/simulation4iw_6.0fp5/bin /opt/macrotransfer4iw_6.0fp2/bin /opt/ifxkernel_2.1m3/bin /opt/inway_6.0/bin /opt/lsf_7.0.6/bin /opt/pvm_3.4.6/bin /opt/lsf_7.0.6/share/exec/dbs /usr/NX/bin /usr/kerberos/bin /bin /usr/bin . /home/bin /usr/ucb /opt/Df2FP4iw_6.0fp2/bin_post /opt/inway_6.0/bin_post /usr/local/bin) prompt {:sense3d/mcp_oa/default}@%M:%c0> prompt2 %R? prompt3 CORRECT>%R (y|n|e|a)? savehist 40 shell /bin/tcsh shlvl 6 sourced 1 status 0 tcsh 6.13.00 term xterm tty pts/74 uid 22464 version tcsh 6.13.00 (Astron) 2004-05-19 (x86_64-unknown-linux) options 8b,nls,dl,al,kan,rh,color,dspm,filec
    - +6 replies
    - pq
      
      2012-08-27 14:18
      
      User since
      2003-08-04
      12208 Artikel
      Admin1
      
      wenn du den kompletten pfad nicht weisst, versuch es mit "which module".
      als welcher user führst du das in der konsole aus, und als welcher user wird das perl-skript gestartet, und in welcher umgebung?
      es gibt da offensichtlich einen unterschied, und den gilt es rauszufinden, daher brauchen wir möglichst genaue informationen. ich kenne den befehl auch nicht.
      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: Wie frage ich & perlintro brian's Leitfaden für jedes Perl-Problem
      - +5 replies
      - zocker76
        
        2012-08-27 14:38
        
        User since
        2012-08-27
        8 Artikel
        BenutzerIn
        
        Code: (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 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45
        
        COLORS /etc/DIR_COLORS.xterm NAMESERVICE LDAP SEQ1 ^[]2; SEQ2 ^G^[]1; SEQ3 ^G UMASK 7 _ clear addsuffix argv () cdpath () cshrc /opt/iremGL4iw_6.0m1/etc/cshrc.IremGL cwd /home/sense3d/mcp_oa/nodm/default dirstack /home/sense3d/mcp_oa/nodm/default echo_style both edit file /home/zocker76/.i18n filec gid 29538 group ifxuser headbase vihlc639: history 40 home /home/zocker76 iam zocker76 ignoreeof killring 30 lcd () modules_shell tcsh noclobber owd /home/sense3d/mcp_oa/nodm/default path (/usr/lib64/qt-3.3/bin /home/sense3d/mcp_oa/nodm/default/bin /opt/iremGL4iw_6.0m1/bin /opt/r2g4iw_6.0fp2/bin /opt/Df2FP4iw_6.0fp2/bin /opt/codesign_3.1.2/bin /opt/simulation4iw_6.0fp5/bin /opt/macrotransfer4iw_6.0fp2/bin /opt/ifxkernel_2.1m3/bin /opt/inway_6.0/bin /opt/lsf_7.0.6/bin /opt/pvm_3.4.6/bin /opt/lsf_7.0.6/share/exec/dbs /usr/NX/bin /usr/kerberos/bin /bin /usr/bin . /home/zocker76/bin /usr/ucb /opt/Df2FP4iw_6.0fp2/bin_post /opt/inway_6.0/bin_post /usr/local/bin) prompt {zocker76:sense3d/mcp_oa/default}@%M:%c0> prompt2 %R? prompt3 CORRECT>%R (y|n|e|a)? savehist 40 shell /bin/tcsh shlvl 6 sourced 1 status 0 tcsh 6.13.00 term xterm tty pts/74 uid 22464 user zocker76 version tcsh 6.13.00 (Astron) 2004-05-19 (x86_64-unknown-linux) options 8b,nls,dl,al,kan,rh,color,dspm,filec
        
        Soweit die Benutzer..
        
        Bei Which Module kommt das Raus:
        
        Code: (dl )
        
        module: aliased to set _prompt="$prompt";set prompt="";eval `/opt/Modules/bin/modulecmd tcsh !*`;set prompt="$_prompt";unset _prompt
        
        +4 replies
        
        zocker76
        
        2012-08-27 14:39
        
        User since
        2012-08-27
        8 Artikel
        BenutzerIn
        
        Also das ist von which module sry^^
        
        Code: (dl )
        
        module: aliased to set _prompt="$prompt";set prompt="";eval `/opt/Modules/bin/modulecmd tcsh !*`;set prompt="$_prompt";unset _prompt
        
        +3 replies
        
        pq
        
        2012-08-27 14:43
        
        User since
        2003-08-04
        12208 Artikel
        Admin1
        
        naja, wenn es ein shell-alias ist, ist klar, dass es von system nicht gefunden wird. da musst du wohl den direkten befehl verwenden. wie genau, weiss ich auch nicht, da ich modulecmd auch nicht kenne.
        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: Wie frage ich & perlintro brian's Leitfaden für jedes Perl-Problem
        
        +2 replies
        
        zocker76
        
        2012-08-27 15:05
        
        User since
        2012-08-27
        8 Artikel
        BenutzerIn
        
        Danke für die Mühe erstmal.
        
        Hat keiner von euch schon Textdateine aus der Konsole heraus geöffnet? Braucht das keiner?
        
        Oder könntest du mir einen Anhaltspunkt geben, wie der "richtige", funktionierende Befehl herauszufinden wäre?
        
        EDIT: Tut mir leid wegen den Multipostings, das waren nur Ladefehler.
        
        Ich habe jetzt eine provisorische Alternativlösung in mein Skript eingebaut, gelöst ist der Thread deshalb aber natürlich noch lange nicht, ich hätte schon noch gerne eine ordentliche Lösung ;)
        Last edited: 2012-08-27 16:09:27 +0200 (CEST)
        
        hlubenow
        
        2012-08-27 16:11
        
        User since
        2009-02-22
        875 Artikel
        BenutzerIn
        
        2012-08-27T13:05:56 zocker76
        Danke für die Mühe erstmal.
        
        Hat keiner von euch schon Textdateine aus der Konsole heraus geöffnet? Braucht das keiner?
        
        Doch, ich mach' das ständig. "vim" läuft sogar primär auf der Konsole.
        Aber alle anderen Editoren lassen sich natürlich auch von dort öffnen, Dein "gedit"-Befehl zeigt's ja.
        
        2012-08-27T13:05:56 zocker76
        Oder könntest du mir einen Anhaltspunkt geben, wie der "richtige", funktionierende Befehl herauszufinden wäre?
        
        alias-Befehle sind typischerweise in /etc/bash.bashrc, /etc/bash.bashrc.local und ~/.bashrc definiert. Jedenfalls bei SuSE.
        
        Aber am einfachsten wäre es wahrscheinlich, Du definierst Dir ein bash-Skript:
        
        Code: (dl )
        
        1 2 3 4
        
        #!/bin/bash # mysript.sh module load freeware gedit datei.txt
        
        Ausführbar und nach "/usr/local/bin". Dann im Perl-Skript
        
        Code (perl): (dl )
        
        system("/usr/local/bin/myskript");
        
        oder versuchsweise auch mal
        
        Code (perl): (dl )
        
        system("source /usr/local/bin/myskript");
- gelöscht 2012-08-27 14:00
- Rone
  
  2012-08-27 14:08
  
  User since
  2008-06-20
  11 Artikel
  BenutzerIn
  
  Hmm, evtl. erst mal mit whatis module bzw. type module prüfen, was module überhaupt ist?!

View all threads created 2012-08-27 13:04.