Hi,

I'm experiencing problems with sending UDP broadcasts with perl from VMS. When the 
packets exceed a certain size (I am assuming ip packet size minus some overhead) the 
packet cannot be received by the clients.
Analysis with a network monitor shows, that only the first fragment is put on the net, 
signalling that there will follow more (fragmentation bit). But the packets that 
should follow are never sent.
The same script produces fragments correctly on WindowsNT.
A small C program (essentialy from the sys$examples dir) worked without any problems. 
All fragments were sent correctly.
Suspecting a problem with my perl installation (5.00502), I compiled a new  one 
(5.6.1). But the problem stays the same.

Does someone have an idea?
If needed I can send the perl scripts and the C programm.

--
Thomas Kratz                   Tel.: +49 6131 13- 3284
IT-Service, Handelssysteme     Fax.: +49 6131 13-61284
Landesbank Rheinland-Pfalz        55098 Mainz, Germany


Here are my installation options (All important tests ok)

Summary of my perl5 (revision 5.0 version 6 subversion 1) configuration:
  Platform:
    osname=VMS, osvers=V7.1-2, archname=VMS_AXP
    uname='VMS uf1281 V7.1-2 AlphaServer 4100 5/466 4MB'
    config_args=''
    hint=none, useposix=false, d_sigaction=define
    usethreads=undef use5005threads=undef useithreads=undef usemultiplicity=unde
f
    useperlio=undef d_sfio=undef uselargefiles=undef usesocks=undef
    use64bitint=undef use64bitall=undef uselongdouble=undef
  Compiler:
    cc='CC/DECC', ccflags ='/Include=[]/Standard=Relaxed_ANSI/Prefix=All/Obj=.ob
j/NoList',
    optimize='',
    cppflags='undef'
    ccversion='60090001', gccversion='', gccosandvers='undef'
    intsize=4, longsize=4, ptrsize=4, doublesize=8, byteorder=1234
    d_longlong=define, longlongsize=8, d_longdbl=define, longdblsize=16
    ivtype='long', ivsize=4, nvtype='double', nvsize=8, Off_t='int', lseeksize=4
    alignbytes=8, usemymalloc=N, prototype=define
  Linker and Libraries:
    ld='Link', ldflags ='/NoTrace/NoMap'
    libpth=/sys$share /sys$library
    libs= 
    perllibs= 
    libc=(DECCRTL), so=exe, useshrplib=undef, libperl=undef
  Dynamic Linking:
    dlsrc=dl_vms.c, dlext=exe, d_dlsymun=undef, ccdlflags=''
    cccdlflags='', lddlflags='/Share'


Characteristics of this PERLSHR image: 
  Compile-time options: DEBUGGING
  Built under VMS
  Compiled at Apr 12 2001 19:50:10
  %ENV:
    PERLSHR="PERL_ROOT:[000000]PERLSHR.EXE"
    PERL_ROOT="SOFTWARE:[PERL_TEST.]"
  @INC:
    perl_root:[lib.VMS_AXP.5_6_1]
    perl_root:[lib]
    perl_root:[lib.site_perl.VMS_AXP]
    perl_root:[lib.site_perl]
    /perl_root/lib/site_perl
    .
UF1281_LF49830 >> ucx sho ver

  DIGITAL TCP/IP Services for OpenVMS Alpha Version V5.0A - ECO 1
  on a AlphaServer 4100 5/466 4MB running OpenVMS V7.1-2  

--
Thomas Kratz                   Tel.: +49 6131 13- 3284
IT-Service, Handelssysteme     Fax.: +49 6131 13-61284
Landesbank Rheinland-Pfalz        55098 Mainz, Germany

  


Reply via email to