Hi Prasad,

Try this,

use strict;
use warnings;
use File::Path;

my ($val1,$val2,$valxy);
print "enter value for val1 and val2 \n";
chomp($val1 = <STDIN>);
chomp($val2 = <STDIN>);
$valxy = "$val1$val2";
mkpath (["./$valxy"],1);
----------------------------------
Cheers,
Chetak.
I am a perl newbie .So friends pls *correct* me if there is a better way
to do this or If I am downright wrong ;-)



-----Original Message-----
From: Prasad Karpur [mailto:[EMAIL PROTECTED] 
Sent: Friday, October 10, 2003 2:42 AM
To: [EMAIL PROTECTED]
Subject: File::Path question
        

I initially set $value1, $value2 and $value3 to null values $value1 =
""; $value2 = ""; $value3 = "";

I get the values of $value1, $value2 and $value from input

$valuexyz = "$value1$value2$value3";

mkpath(["$TMPDIR/$valuexyz"], 1, 0777);

$valuexyz does not get evaluated. But if i set $value = "a1" and $value2
= 
"b1" and $value3 = "c1", then mkpath works fine. What am i doing wrong?


Thanks

Prasad

_________________________________________________________________
Instant message in style with MSN Messenger 6.0. Download it now FREE!  
http://msnmessenger-download.com


-- 
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]


**************************Disclaimer************************************

Information contained in this E-MAIL being proprietary to Wipro Limited is 
'privileged' and 'confidential' and intended for use only by the individual
 or entity to which it is addressed. You are notified that any use, copying 
or dissemination of the information contained in the E-MAIL in any manner 
whatsoever is strictly prohibited.

***************************************************************************

--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]

Reply via email to