---------- Forwarded message ----------
From: Bhupesh Gupta <[email protected]>
Date: Sat, Mar 7, 2009 at 8:18 PM
Subject: ars_export not returning expected output
To: [email protected]
Cc: Bhupesh Gupta <[email protected]>
($ACCOUNT, $PASSWORD, $path) = @ARGV;
#chomp($path = `pwd`) if (!$path);
$c = ars_Login("BHUPESH-GUPTA",$ACCOUNT,$PASSWORD);
die "login error: $ars_errstr\n" unless defined($c);
@schema = ars_GetListSchema($c, 0, 1024);
@active = ars_GetListActiveLink($c);
@filter = ars_GetListFilter($c);
@escal = ars_GetListEscalation($c);
@menu = ars_GetListCharMenu($c);
@admin_ext = ars_GetListAdminExtension($c);
sub dump_type {
my ($path, $type, $names) = @_;
if (! -d "$path") {
mkdir "$path" || die "can't create directory $path";
mkdir "$path/RCS" || die "can't create directory $path/RCS";
}
foreach $name (@$names) {
my $val = ars_Export($c,"",$type,$name);
print "$type\n";
print "$name\n";
print "$val\n";
}
}
dump_type("$path/schema", "Schema", \...@schema);
Dear friends : Please suggest.
when i am executing this small programm, the print $val statement not
printing anything. the syntax looks ok. Please help
--
Regards,
Bhupesh Gupta
_______________________________________________________________________________
UNSUBSCRIBE or access ARSlist Archives at www.arslist.org
Platinum Sponsor: RMI Solutions ARSlist: "Where the Answers Are"