[QPID-4730] Bug for qpid perl binding. The object is overwritten by the return value when a function return an integer.

• Type: Bug
• Status: Closed
• Priority: Major
• Resolution: Fixed
• Affects Version/s: 0.18
• Fix Version/s: 0.25
• Component/s: Perl Client
• Assignee: Darryl Pierce
• Reporter: Hao Chang Yu
• Created: 09/Apr/13 01:06
• Updated: 19/Feb/14 11:30
• Resolved: 04/Oct/13 19:21

Description

As per subject. Please read the example below for more details.

print("receiver: " . $receiver . "\n");
print("getCapacity; " . $receiver->getCapacity() . "\n");
print("receiver: " . $receiver . "\n");
print("getAvailable: " . $receiver->getAvailable() . "\n");

receiver: cqpid::Receiver=HASH(0xc0fbb8)
getCapacity: 0
receiver: 0
0: Operation now in progress: Can't call method "getAvailable" without a package or object reference at ./consumer.pl line 109.