Re: Perl 5.22 mvswrite Segmentation Fault

Hi,
 Parameter 'lrecl' must be a multiple parameter 'blksize'.  lrecl=105, blksize=(105 or 210 etc)

 look dynalloc() http://www.ibm.com/support/knowledgecenter/en/SSLTBW_2.1.0/com.ibm.zos.v2r1.bpxbd00
/dynalloc.htm

 --

Regards,

Yaroslav Kuzmin
Developer C/C++ ,z/OS , Linux
3 Zhukovskiy Street · Miass, Chelyabinsk region 456318 · Russia
Tel:  +7.922.2.38.33.38
Email: [email protected]
Web: www.rocketsoftware.com


-------- Исходное сообщение --------
От: "Cooper, Brandon" <[email protected]>
Кому: [email protected] <[email protected]>
Тема: Perl 5.22 mvswrite Segmentation Fault
Дата: Tue, 16 Aug 2016 20:30:03 +0000

Hey guys,

I recently upgraded from Perl 5.00503 to 5.22.0. I am using the OS390::Stdio (version 0.008) package
to process z/OS datasets record by record. Previously, I was able to open my output dataset as
follows:

my $outfh = mvsopen("//'USERBTC.OUTPUT.FILE'","wb, lrecl=105") or die $!;

and write to it with:

mvswrite($outfh, $record, 105) or die $!;

However when using Perl 5.22.0, I am now getting an Abend S0C4-X'4' (Protection Exception) error
while using mvswrite(), unless I remove the lrecl=105 parameter from mvsopen().
However when I do this, mvsopen() creates a dataset with  lrecl=80 and wraps the 105 byte input
record across two output records.

Does anybody know if keyword parameters  are supported in mvsopen()  for Perl 5.22.0, and if so how
do I specify them?


Thanks for your help,
Brandon Cooper
Mainframe Admin | IT Operations
Texas Instruments



================================
Rocket Software, Inc. and subsidiaries ■ 77 Fourth Avenue, Waltham MA 02451 ■ +1 877.328.2932 ■ +1 781.577.4321
Unsubscribe From Commercial Email – [email protected]
Manage Your Subscription Preferences - http://info.rocketsoftware.com/GlobalSubscriptionManagementEmailFooter_SubscriptionCenter.html
Privacy Policy - http://www.rocketsoftware.com/company/legal/privacy-policy
================================

This communication and any attachments may contain confidential information of Rocket Software, Inc. All unauthorized use, disclosure or distribution is prohibited. If you are not the intended recipient, please notify Rocket Software immediately and destroy all copies of this communication. Thank you.