The script working fine. but I like to save output of "$avar="$dir/
$db" into a file. How do I do that?  Thanks LC


print "which client\n";
my $a = <>;
chomp $a;
my $db = <>;
chomp $db;
my $dir="/u1/data/$a";
my $avar="$dir/$db";
$avar="$dir/$db";

print "$avar\n";


-- 
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
http://learn.perl.org/


Reply via email to