parameter.pm (9780544f) parameter.pm (5b11f0d3)
1#**************************************************************
2#
3# Licensed to the Apache Software Foundation (ASF) under one
4# or more contributor license agreements. See the NOTICE file
5# distributed with this work for additional information
6# regarding copyright ownership. The ASF licenses this file
7# to you under the Apache License, Version 2.0 (the
8# "License"); you may not use this file except in compliance

--- 138 unchanged lines hidden (view full) ---

147 {
148 if (!($$pathref =~ /^\s*\w\:/)) # this is a relative windows path
149 {
150 $$pathref = cwd() . $pre2par::globals::separator . $$pathref;
151 $$pathref =~ s/\//\\/g;
152 }
153 }
154
1#**************************************************************
2#
3# Licensed to the Apache Software Foundation (ASF) under one
4# or more contributor license agreements. See the NOTICE file
5# distributed with this work for additional information
6# regarding copyright ownership. The ASF licenses this file
7# to you under the Apache License, Version 2.0 (the
8# "License"); you may not use this file except in compliance

--- 138 unchanged lines hidden (view full) ---

147 {
148 if (!($$pathref =~ /^\s*\w\:/)) # this is a relative windows path
149 {
150 $$pathref = cwd() . $pre2par::globals::separator . $$pathref;
151 $$pathref =~ s/\//\\/g;
152 }
153 }
154
155 if ( $pre2par::globals::isos2 )
156 {
157 if (!($$pathref =~ /^\s*\w\:/)) # this is a relative os2 path
158 {
159 $$pathref = cwd() . $pre2par::globals::separator . $$pathref;
160 $$pathref =~ s/\\/\//g;
161 }
162 }
163
155 $$pathref =~ s/\Q$pre2par::globals::separator\E\s*$//; # removing ending slashes
156}
157
158#####################################
159# Writing parameter to shell
160#####################################
161
162sub outputparameter

--- 12 unchanged lines hidden --- 		164 $$pathref =~ s/\Q$pre2par::globals::separator\E\s*$//; # removing ending slashes
165}
166
167#####################################
168# Writing parameter to shell
169#####################################
170
171sub outputparameter

--- 12 unchanged lines hidden ---