Opened by pktm at 2010-06-26 15:38
User since
2003-08-07
2921 Artikel
BenutzerIn
![[Homepage]](/battie/theme/default/homepage.gif)
2003-08-07
2921 Artikel
BenutzerIn
ja, das mit dem anhängen klappt nicht, weil ich auf die zum Zeitpunkt des Aufrufs mit einem Datensatz nicht zugreifen kann.
Das mit $ENV scheint nicht zu klappen, hier mein Skript:
Setzt man %ENV anders?
Grüße, pktm
//Modedit GwenDragon: Codetags repariert
Last edited: 2010-06-26 16:34:56 +0200 (CEST)
Das mit $ENV scheint nicht zu klappen, hier mein Skript:
Code: (dl
)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
#!/Perl/bin/perl
use strict;
use warnings;
my $task = $ARGV[0];
my $input = $ARGV[1];
if( $task eq 'filename' ) {
my ($oxartnum) = $input =~ m~.+\\([^\\]+).html~;
$ENV{current_oxartnum} = $oxartnum;
print "set oxartnum to $oxartnum\n";
}else{
my $oxartnum = $ENV{current_oxartnum};
print "new segment: <$oxartnum, $input>\n";
}
Setzt man %ENV anders?
Grüße, pktm
//Modedit GwenDragon: Codetags repariert
Last edited: 2010-06-26 16:34:56 +0200 (CEST)
http://www.intergastro-service.de (mein erstes CMS :) )