branch | foerste |
changeset 153 | af27be0a326b |
parent 152 | 1ed33114d87f |
152:1ed33114d87f | 153:af27be0a326b |
---|---|
7 use base "Exporter"; |
7 use base "Exporter"; |
8 |
8 |
9 our $VERSION = 0.0; |
9 our $VERSION = 0.0; |
10 our @EXPORT_OK = qw(make_config); |
10 our @EXPORT_OK = qw(make_config); |
11 |
11 |
12 sub make_config($) { |
12 sub make_config { |
13 |
13 |
14 my ($c) = @_; |
14 my ($c) = @_; |
15 |
15 |
16 my $f = File::Temp->new or die "Config file creation failed\n"; |
16 my $f = File::Temp->new or die "Config file creation failed\n"; |
17 |
17 |