RE: Yaroslav, please run the attached quick perl script
From: Karl Williamson [mailto:pub...@khwilliamson.com]
> And send me the output.
Hi Karl,
Attached is the output, version 5.23.3+ perl, if you need the very latest
please let me know.
Us doing first steps, here is the our -V
Summary of my perl5 (revision 5 version 23 subversion 4) configuration:
Snapshot of: 3ece07bcb5b3313741afeab4751444de186b8349
Platform:
osname=os390, osvers=23.00, archname=os390
uname='os390 x102 23.00 03 2818 '
config_args=''
hint=previous, useposix=true, d_sigaction=define
useithreads=undef, usemultiplicity=undef
use64bitint=undef, use64bitall=undef, uselongdouble=undef
usemymalloc=n, bincompat5005=undef
Compiler:
cc='c99', ccflags ='-qlanglvl=extended:extc89:extc99 -qlongname -qxplink
-qdll -qfloat=ieee -qhaltonmsg=3296:4108 -DMAXSIG=39 -DOEMVS -D_OE_SOCKETS
-D_XOPEN_SOURCE_EXTENDED -D_ALL_SOURCE -DYYDYNAMIC -D_POSIX_SOURCE=1',
optimize=' ',
cppflags=''
ccversion='', gccversion='', gccosandvers=''
intsize=4, longsize=4, ptrsize=4, doublesize=8, byteorder=4321, doublekind=4
d_longlong=define, longlongsize=8, d_longdbl=define, longdblsize=16,
longdblkind=2
ivtype='long', ivsize=4, nvtype='double', nvsize=8, Off_t='off_t',
lseeksize=4
alignbytes=8, prototype=define
Linker and Libraries:
ld='ld', ldflags ='-qxplink -qdll'
libpth=/lib /usr/lib
libs=-lm -lc
perllibs=-lm -lc
libc=, so=a, useshrplib=false, libperl=libperl.a
gnulibc_version=''
Dynamic Linking:
dlsrc=dl_none.xs, dlext=none, d_dlsymun=undef, ccdlflags=''
cccdlflags='-qxplink -qdll', lddlflags=''
Characteristics of this binary (from libperl):
Compile-time options: HAS_TIMES PERL_COPY_ON_WRITE PERL_DONT_CREATE_GVSV
PERL_HASH_FUNC_ONE_AT_A_TIME_HARD PERL_PRESERVE_IVUV
PERLIO_LAYERS USE_LARGE_FILES USE_LOCALE
USE_LOCALE_COLLATE USE_LOCALE_CTYPE
USE_LOCALE_NUMERIC USE_LOCALE_TIME USE_PERL_ATOF
USE_PERLIO
Built under os390
Compiled at Oct 14 2015 11:40:48
%ENV:
PERLRUN="/usr/lpp/perl"
PERLSO="/usr/lpp/perl/lib/5.8.7/os390-thread-multi/CORE/"
@INC:
/tmp/vk/perl-unz/lib
/usr/local/lib/perl5/site_perl/5.23.4/os390
/usr/local/lib/perl5/site_perl/5.23.4
/usr/local/lib/perl5/5.23.4/os390
/usr/local/lib/perl5/5.23.4
.
Regards,
Vadim
APPLICATION PROGRAM COMMAND
SOFT HYPHEN
SUBSTITUTE
PRIVACY MESSAGE
NEGATIVE ACKNOWLEDGE
DEVICE CONTROL FOUR
CONTROL SEQUENCE INTRODUCER
SINGLE CHARACTER INTRODUCER
SINGLE GRAPHIC CHARACTER INTRODUCER
START OF STRING
END OF TRANSMISSION
START OF GUARDED AREA
MESSAGE WAITING
CANCEL CHARACTER
SET TRANSMIT STATE
SYNCHRONOUS IDLE
PRIVATE USE ONE
DEVICE CONTROL STRING
ALERT
ACKNOWLEDGE
ENQUIRY
PARTIAL LINE BACKWARD
PARTIAL LINE FORWARD
LINE TABULATION SET
CHARACTER TABULATION with JUSTIFICATION
CHARACTER TABULATION SET
ESCAPE
END OF TRANSMISSION BLOCK
INDEX
NO BREAK HERE
BREAK PERMITTED HERE
HIGH OCTET PRESET
PADDING CHARACTER
INFORMATION SEPARATOR ONE
INFORMATION SEPARATOR TWO
INFORMATION SEPARATOR THREE
INFORMATION SEPARATOR FOUR
SINGLE SHIFT THREE
PRIVATE USE TWO
END OF MEDIUM
CANCEL
END OF SELECTED AREA
BACKSPACE
OPERATING SYSTEM COMMAND
DEVICE CONTROL THREE
DEVICE CONTROL TWO
DEVICE CONTROL ONE
DATA LINK ESCAPE
SHIFT IN
SHIFT OUT
SINGLE SHIFT TWO
REVERSE LINE FEED
END OF GUARDED AREA
DELETE
START OF SELECTED AREA
STRING TERMINATOR
END OF TEXT
START OF TEXT
START OF HEADING
NULL
CHARACTER TABULATION
LINE FEED
LINE TABULATION
FORM FEED
CARRIAGE RETURN
NEXT LINE
NO-BREAK SPACE
SPACE
_
-
,
;
:
!
INVERTED EXCLAMATION MARK
?
INVERTED QUESTION MARK
.
MIDDLE DOT
'
"
LEFT-POINTING DOUBLE ANGLE QUOTATION MARK
RIGHT-POINTING DOUBLE ANGLE QUOTATION MARK
(
)
[
]
{
}
SECTION SIGN
PILCROW SIGN
@
*
/
\
&
#
%
`
ACUTE ACCENT
^
MACRON
DIAERESIS
CEDILLA
DEGREE SIGN
COPYRIGHT SIGN
REGISTERED SIGN
+
PLUS-MINUS SIGN
DIVISION SIGN
MULTIPLICATION SIGN
<
=
>
NOT SIGN
|
BROKEN BAR
~
CURRENCY SIGN
CENT SIGN
$
POUND SIGN
YEN SIGN
0
1
SUPERSCRIPT ONE
VULGAR FRACTION ONE HALF
VULGAR FRACTION ONE QUARTER
2
SUPERSCRIPT TWO
3
SUPERSCRIPT THREE
VULGAR FRACTION THREE QUARTERS
4
5
6
7
8
9
a
A
FEMININE ORDINAL INDICATOR
a with ACUTE
A with ACUTE
a with GRAVE
A with GRAVE
a with BREVE
A with BREVE
a with CIRCUMFLEX
A with CIRCUMFLEX
a with RING ABOVE
A with RING ABOVE
a with DIAERESIS
A with DIAERESIS
a with TILDE
A with TILDE
a with OGONEK
A with OGONEK
a with MACRON
A with MACRON
ae
AE
b
B
c
C
c with ACUTE
C with ACUTE
c with CIRCUMFLEX
C with CIRCUMFLEX
c with CARON
C with CARON
c with DOT ABOVE
C with DOT ABOVE
c with CEDILLA
C with CEDILLA
d
D
d with CARON
D with CARON
d with STROKE
D with STROKE
eth
ETH
e
E
e with ACUTE
E with ACUTE
e with GRAVE
E with GRAVE
e with BREVE
E with BREVE
e with CIRCUMFLEX
E with CIRCUMFLEX
e with CARON
E with CARON
e with DIAERESIS
E with DIAERESIS
e with DOT ABOVE
E with DOT ABOVE
e with OGONEK
E with OGONEK
e with MACRON
E with MACRON
f
F
Re: Yaroslav, please run the attached quick perl script
В Пн., 26/10/2015 в 22:04 -0600, Karl Williamson пишет: > And send me the output. Hi Karl - output in attached file (05:37) RS12 : PDKUZM | ~/ussport/perl/perl-build :> ./perl -I lib -V Summary of my perl5 (revision 5 version 23 subversion 5) configuration: Snapshot of: 2087a2f459cb5cb3f2efaac50dbd680e08bce4ef Platform: osname=os390, osvers=24.00, archname=os390 uname='os390 rs12 24.00 04 2964 ' config_args='-des -Dusedevel -Dusedl -DDEBUGGING' hint=recommended, useposix=true, d_sigaction=define useithreads=undef, usemultiplicity=undef use64bitint=undef, use64bitall=undef, uselongdouble=undef usemymalloc=n, bincompat5005=undef Compiler: cc='c99', ccflags ='-qlanglvl=extended:extc89:extc99 -qlongname -qxplink -qdll -qfloat=ieee -qhaltonmsg=3296:4108 -DMAXSIG=39 -DOEMVS -D_OE_SOCKETS -D_XOPEN_SOURCE_EXTENDED -D_ALL_SOURCE -DYYDYNAMIC -D_POSIX_SOURCE=1 -D_SHR_ENVIRON -DPERL_EXTERNAL_GLOB -qexportall -qdll -qxplink -DDEBUGGING', optimize=' -g', cppflags='' ccversion='', gccversion='', gccosandvers='' intsize=4, longsize=4, ptrsize=4, doublesize=8, byteorder=4321, doublekind=4 d_longlong=define, longlongsize=8, d_longdbl=define, longdblsize=16, longdblkind=2 ivtype='long', ivsize=4, nvtype='double', nvsize=8, Off_t='off_t', lseeksize=4 alignbytes=8, prototype=define Linker and Libraries: ld='c99', ldflags ='-qxplink -qdll' libpth=/lib /usr/lib libs=-lm -lc perllibs=-lm -lc libc=, so=so, useshrplib=true, libperl=libperl.so gnulibc_version='' Dynamic Linking: dlsrc=dl_dllload.xs, dlext=so, d_dlsymun=undef, ccdlflags='-qxplink -qdll /u/pdkuzm/ussport/perl/perl-build/libperl.x' cccdlflags='-c -qexportall -qxplink -qdll', lddlflags='-qxplink -qdll /u/pdkuzm/ussport/perl/perl-build/libperl.x' Characteristics of this binary (from libperl): Compile-time options: DEBUGGING HAS_TIMES PERL_COPY_ON_WRITE PERL_DONT_CREATE_GVSV PERL_EXTERNAL_GLOB PERL_HASH_FUNC_ONE_AT_A_TIME_HARD PERL_MALLOC_WRAP PERL_PRESERVE_IVUV PERL_USE_DEVEL PERLIO_LAYERS USE_LARGE_FILES USE_LOCALE USE_LOCALE_COLLATE USE_LOCALE_CTYPE USE_LOCALE_NUMERIC USE_LOCALE_TIME USE_PERL_ATOF USE_PERLIO Locally applied patches: SMOKE2087a2f459cb5cb3f2efaac50dbd680e08bce4ef Built under os390 Compiled at Oct 26 2015 03:01:51 %ENV: PERL5LIB="/u/pdkuzm/perl/lib:/rsusr/local/lib/perl5" @INC: lib /u/pdkuzm/perl/lib /rsusr/local/lib/perl5 /usr/local/lib/perl5/site_perl/5.23.5/os390 /usr/local/lib/perl5/site_perl/5.23.5 /usr/local/lib/perl5/5.23.5/os390 /usr/local/lib/perl5/5.23.5 . (05:37) RS12 : PDKUZM | ~/ussport/perl/perl-build :> P.S. Еще появились рабочие мощности z/OS )) , подключайте smoke. -- 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: ykuz...@rocketsoftware.com Web: www.rocketsoftware.com Rocket Software, Inc. and subsidiaries ■ 77 Fourth Avenue, Waltham MA 02451 ■ +1 800.966.3270 ■ +1 781.577.4321 Unsubscribe From Commercial Email – unsubscr...@rocketsoftware.com 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. collate.t.log.gz Description: collate.t.log.gz
Re: Yaroslav, please run the attached quick perl script
On 10/27/2015 03:44 AM, Yaroslav Kuzmin wrote: В Пн., 26/10/2015 в 22:04 -0600, Karl Williamson пишет: And send me the output. Hi Karl - output in attached file Well it turns out that I screwed up and that file didn't tell me the things I wanted it to. Attached is a revised version that I think will. P.S. Еще появились рабочие мощности z/OS )) , подключайте smoke. I had to get ribasushi++ to translate this for me. And we don't know precisely what you mean. Does it mean that you have faster hardware, so we can include more things to smoke? Or more hardware, so things can be done in parallel? Or you have hardware you can add smoking to? If you can make things so they kick off automatically, we could have you do a smoke-me for not just my branch. Let me know, so we can figure out how best to utilize it. -- Regards, Yaroslav Kuzmin collate.t Description: Troff document
Re: Yaroslav, please run the attached quick perl script
On 10/27/2015 06:56 PM, Karl Williamson wrote: On 10/27/2015 03:44 AM, Yaroslav Kuzmin wrote: В Пн., 26/10/2015 в 22:04 -0600, Karl Williamson пишет: And send me the output. Hi Karl - output in attached file Well it turns out that I screwed up and that file didn't tell me the things I wanted it to. Attached is a revised version that I think will. P.S. Еще появились рабочие мощности z/OS )) , подключайте smoke. I had to get ribasushi++ to translate this for me. And we don't know precisely what you mean. Does it mean that you have faster hardware, so we can include more things to smoke? Or more hardware, so things can be done in parallel? Or you have hardware you can add smoking to? If you can make things so they kick off automatically, we could have you do a smoke-me for not just my branch. Let me know, so we can figure out how best to utilize it. -- Regards, Yaroslav Kuzmin And, I forgot to mention, the previous smoke went better than I expected. But I have a new one to test with a few fixes, if you like. You can run the script from my previous email before you apply those, or after, just let me know which. It's updated to latest blead.
Re: Yaroslav, please run the attached quick perl script
В Вт., 27/10/2015 в 18:56 -0600, Karl Williamson пишет: > On 10/27/2015 03:44 AM, Yaroslav Kuzmin wrote: > > В Пн., 26/10/2015 в 22:04 -0600, Karl Williamson пишет: > > > And send me the output. > > > > Hi Karl - output in attached file > > > > > Well it turns out that I screwed up and that file didn't tell me the > things I wanted it to. Attached is a revised version that I think will. > > Output in attached file. > > > > > > P.S. Еще появились рабочие мощности z/OS )) , подключайте smoke. > > > > I had to get ribasushi++ to translate this for me. And we don't know > precisely what you mean. Does it mean that you have faster hardware, so > we can include more things to smoke? Or more hardware, so things can be > done in parallel? Or you have hardware you can add smoking to? If you > can make things so they kick off automatically, we could have you do a > smoke-me for not just my branch. Let me know, so we can figure out how > best to utilize it. > This message is the answer to a email Vadim Konovalov. I hope he will test perl on z/OS v1R13, I am now working on z/OS v2R1. -- 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: ykuz...@rocketsoftware.com Web: www.rocketsoftware.com Rocket Software, Inc. and subsidiaries ■ 77 Fourth Avenue, Waltham MA 02451 ■ +1 800.966.3270 ■ +1 781.577.4321 Unsubscribe From Commercial Email – unsubscr...@rocketsoftware.com 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. collate.t.log.gz Description: collate.t.log.gz
