HDTenEightyP/NetNews huggingface dataset:
From: flee@cs.psu.edu (Felix Lee)
Subject: Generating reports
Date: Thu, 21 Jan 1993 09:01:20 GMT

Is it just me, or does Perl make a mediocre report-generating
language?

Data parsing is fine, but output is screwy.  I can't seem to find a
reasonable way of tabulating data, accumulating data (like totals,
averages, quartiles), and printing the results.

Anything I try either
* duplicates information (like output column order) in several places
in the script, which makes it painful to make minor changes in the
report.
* ends up simulating data types like records and arrays of records in
really painful ways.

Something I haven't tried yet: generating Perl on the fly.  Perhaps
this is the best way to deal with Perl's inadequacies in general.
(Other than dumping it for another language:-)

Another problem is Perl doesn't have enough date/time support,
something that comes up all the time in analyzing log files.  Yes,
such functions could all be written in Perl, but I'm lazy, and
besides, I did, and they're slow.  Well, in a slow language like Perl,
a little more slowness probably doesn't hurt much.

Oh well.  Time to give up the struggle for now.
--
Newsgroups: comp.lang.perl
Subject: getting input from a tty
From: jsteiner@anwsun.phya.utoledo.edu (jason 'Think!' steiner)
Date: 22 Jan 93 17:25:29 EST
X-Newsreader: Tin 1.1 PL4

ok, now i feel really stupid, but i'm really itching for an answer.
i'm writing a program that first reads a bunch of stuff from stdin,
(up to an EOF) then prompts the user for how that stuff is to be 
processed. it works fine if stdin & the terminal happen to be the 
same thing, since i can just seek(STDIN,0,0) & keep going from there.

if they're -not- the same thing, i need some way to read directly
from the tty or reattach STDIN back to the tty. any suggestions or
fragments?

jason

Newsgroups: comp.lang.perl
From: cluther@morticia.cnns.unt.edu (Clay Luther)
Subject: Perl rsh
Organization: University of North Texas
Date: Fri, 22 Jan 1993 22:59:45 GMT

Is there a perl script which performs "rsh"?

If so, please mail pointers to me.

Thanks!
-- 
Clay Luther
cluther@morticia.cnns.unt.edu
Newsgroups: comp.lang.perl
From: Dov Grobgeld <dov@menora.weizmann.ac.il>
Subject: Re: X and Perl
Reply-To: dov@menora.weizmann.ac.il
Organization: The Internet
Date: Sat, 23 Jan 1993 20:46:52 GMT

|
| wafe talks perl AND tcl.  For that matter everything can talk WAFE.
| /charles
| 
| -- 
| Charles Thayer, Columbia University, Dept. CS, Tech-staff... my words only.

I have done some programming using Perl and wafe, and one of the annoying
parts of it, IMHO, is that the interface to the widgets has to be done in
tcl. If I want to do a widget specific call, I have to to do it in tcl. If
you want to attach an action to a certain event, you have to do it in
tcl. Of course you can make a workaround by having wafe echo a string to
STDOUT which is picked up by Perl, which then does the processing, and
sends back the finished result to wafe (through tcl commands). Indeed I have 
done this in my xwe editor so that you can write Perl actions. But I still 
wish I didn't  have to touch tcl at all.

I wish for a version of wafe which has perl as its engine instead of
tcl. Perhaps that will be feasible with Perl 5.0.
--
                                                        ___   ___
                                                      /  o  \   o \
Dov Grobgeld                                         ( o  o  ) o   |
The Weizmann Institute of Science, Israel             \  o  /o  o /
"Where the tree of wisdom carries oranges"              | |   | |
                                                       _| |_ _| |_
From: yan@isoft.intranet.gr (YIANNIS)
Newsgroups: comp.lang.perl
Subject: (none)
Date: 21 Jan 93 08:42:02 GMT
Reply-To: yan@isoft.intranet.gr
Organization: The Internet

TO whom it may concern:

I understand there is a newsgroup in USENET that inform perl users on the latestnews concerning perl language and its applications. As it seems I do not have  
access to USENET, will you please inform me if there is available any public
domain Text Retrieval software already implemented and in which site it resides.

Thank you in advance

Irini Orfanoudaki     e-mail address: yan@isoft.intranet.gr
Newsgroups: comp.lang.perl
From: irving@Happy-Man.com (Irving_Wolfe)
Subject: Re: SOUNDEX pattern matching
Keywords: soundex, perl
Reply-To: Irving_Wolfe@Happy-Man.com
Organization: Happy Man Corp., Vashon Island, WA 98070-7399
Date: Sat, 23 Jan 1993 02:57:20 GMT

Before we get too far re-posting soundex code, let me ask another 
question:  I tried using this thing and found it pretty useless.  
What's it good for?  I tried to use it to find names, and it was 
just awful at it!  Is anyone at all using this for anything real
today, or is it a clever idea that didn't quite work?
-- 
 Irving_Wolfe@Happy-Man.com      Happy Man Corp.  206/463-9399 x101
 4410 SW Pt. Robinson Rd., Vashon Island, WA  98070-7399   fax x108
 We publish SOLID VALUE for the intelligent investor.   NextMail OK
Info free; sample $20.  Send POSTAL addrs: Solid-Value@Happy-Man.com
Newsgroups: comp.lang.perl
From: davidj@Data-IO.COM (David Jablonski)
Subject: Where is "undump" for a SPARCstation.
Organization: Data I/O Corporation
Date: Fri, 22 Jan 1993 18:19:52 GMT


Hello,

        I am looking for the "undump" program described in the perl man
pages for resurrecting a perl core dump.  Is it available for
SPARCstations?  Archie has proved to be less then helpful in this
matter.  Thanks in advance for your help.

                                        --David
Newsgroups: comp.lang.perl
From: mjeffery@reed.edu (Mark Jefferys)
Subject: Re: A simple test for perl 5.0
Keywords: bug
Organization: Reed College, Portland, OR
Date: Thu, 28 Jan 1993 21:37:53 GMT
Expires: Sun, 21 Feb 1993 08:00:00 GMT

In article <42@glasgow.eiffel.com> ram@eiffel.com (Raphael Manfredi) writes:

% Which is peculiar... Removing one of the 'local' declarations in 'verify'
% on simply avoiding assignment of &explore() into an array makes the
% program loop indefinitely, as expected.

This bug has been fixed for a while, but it is probably time to repost
the fix -- seeing that posts about it seem to show up regularly:


Index: cons.c
*** Orig/cons.c	Thu Jun 11 22:42:01 1992
--- cons.c	Sun Jun 28 18:31:20 1992
***************
*** 1353,1359 ****
  
  		    /* in any event, save the iterator */
  
! 		    (void)apush(tosave,cmd->c_short);
  		}
  		shouldsave |= tmpsave;
  	    }
--- 1353,1360 ----
  
  		    /* in any event, save the iterator */
  
! 		    if (cmd->c_short)  /* Better safe than sorry */
! 			(void)apush(tosave,cmd->c_short);
  		}
  		shouldsave |= tmpsave;
  	    }
***************
*** 1420,1426 ****
  	shouldsave = TRUE;
  	break;
      }
!     if (willsave)
  	(void)apush(tosave,arg->arg_ptr.arg_str);
      return shouldsave;
  }
--- 1421,1427 ----
  	shouldsave = TRUE;
  	break;
      }
!     if (willsave && arg->arg_ptr.arg_str)
  	(void)apush(tosave,arg->arg_ptr.arg_str);
      return shouldsave;
  }
-- 
Mark Jefferys		Internet: mjeffery@reed.edu
Newsgroups: comp.lang.perl
From: benavide@convex.com (John Benavides)
Subject: Re: Editline in perl
Date: Wed, 27 Jan 1993 16:56:23 GMT
Organization: Engineering, CONVEX Computer Corp., Richardson, Tx., USA
X-Disclaimer: This message was written by a user at CONVEX Computer
              Corp. The opinions expressed are those of the user and
              not necessarily those of CONVEX.

ripper@athena.mit.edu writes:


>I'm trying to generate a prompt which would allow users many
>of the spiffy lineeditting characteristics that tcsh has (^A to
>goto beginning of line, ^K to kill the rest of the line, ^E to
>get to the end of the line, arrow keys, etc).  Is there a script 
>out there already that does that?  Is there also a better 
>documented version of 'termcap.pl' (which has more than a header
>of 4 short usage examples)?

>-Ross Lippert
>ripper@athena.mit.edu

Ross, 
    check out the "complete.pl" source described on page 395 of
the Camel book (_Programming Perl_ by L. Wall and R. Schwartz).

I just used it.  I had to reset one of its variables
using "undef($Complete'return);" after each call in my application
because the previous "$input" was still part of the prompt on
succeeding calls.

  |% perl -v
  |
  |This is perl, version 4.0
  |
  |$RCSfile: perl.c,v $$Revision: 4.0.1.7 $$Date: 92/06/08 14:50:39 $
  |Patch level: 34
  |
  |Copyright (c) 1989, 1990, 1991, Larry Wall
  |
  |Perl may be copied only under the terms of either the Artistic License or the
  |GNU General Public License, which may be found in the Perl 4.0 source kit.
  |%

-John Benavides
 benavide@convex.com
--
Regards,
   John Benavides	|Junior Member,
   benavide@convex.com	|Understanding tchrist from his sigs Assoc. (TM)
From: flanagan@grover (Jim Flanagan)
Newsgroups: comp.lang.perl
Subject: Re: month in localtime?
Date: 21 Jan 1993 17:12:29 GMT
Organization: Society for Creative Access to Materials
Reply-To: flanagan@stat.washington.edu
NNTP-Posting-Host: grover.stat.washington.edu

jja@fnbc.com (Joseph Alotta) writes:
: greetings,
: 
: how does one get the month out in localtime?
: this one's right out of the book:
: 
: #!/usr/local/bin/perl  
: ($sec,$min,$hour,$mday,$mon,$year,$wday,$yday,$isdst) = localtime(time);
: print "$sec,$min,$hour,$mday,mon=$mon,$year,$wday,$yday,$isdst\n";
: exit;

  Something like:

@Months = (Jan,Feb,Mar,Apr,May,Jun,Jul,Aug,Sep,Oct,Nov,Dec);
print "$Months[$mon] $mday, $year/n"l
Newsgroups: comp.lang.perl
From: johne@tplrd.tpl.oz.au (John Eldred)
Subject: split array assignment
Originator: johne@sydte3
Organization: Telectronics Pacing Systems
Date: Wed, 27 Jan 93 00:28:56 GMT

Can some kind person tell me why this bit of code prints 4 3 ?

$_ = "a b c\n";
$p = ($x, $y, $z) = split;
$q = split;
print $p, ' ', $q, "\n";

It prints 3 3 if you chop the \n from $_.

Ta

John E.
Newsgroups: comp.lang.perl
From: essbaum@rchland.vnet.ibm.com (Alexander Essbaum)
Subject: Re: perl-mode.el and indenting
Date: Tue, 26 Jan 1993 17:46:28 GMT
Disclaimer: This posting represents the poster's views, not necessarily those of IBM
Organization: IBM Rochester

In article <1993Jan26.164352.13803@rchland.ibm.com>, essbaum@rchland.vnet.ibm.com (Alexander Essbaum) writes:

that's strange.  where's the rest of my message?...

try again:

the reason i'm wondering is because the indenting i get in perl-mode is
sometimes very weird.  for example:

for ($counter = 0;$counter < $#num;$counter++) {
        $_ = $num[$counter];
        if (/ABC ${endname}DEF${number}/i) { $in = 1; }
        elsif ($in == 1) {
        if (/^\s*ABC /i) { last; }
        elsif (/XYZ\s*MOOF/i) {
                $num[$counter-1] =~ /(^.*\s+)(\w+)(OOF\s*)(\s*)(\-*\d+)(.*$)/i;
                $level = $2;
                $w = &check ($level);


BECOMES:

for ($counter = 0;$counter < $#num;$counter++) {
    $_ = $num[$counter];
    if (/ABC ${endname}DEF${number}/i) { $in = 1; }
elsif ($in == 1) {
    if (/^\s*ABC /i) { last; }
elsif (/XYZ\s*MOOF/i) {
    num[$counter-1] =~ /(^.*\s+)(\w+)(OOF\s*)(\s*)(\-*\d+)(.*$)/i;
                                                           $level = $2;
                                                           $w = &check ($level);


is it supposed to do this?

axel
Newsgroups: comp.lang.perl
From: vince@digibd.com (Vince Mar)
Subject: Help Beginner
Organization: DigiBoard Incorporated, Eden Prairie, MN
Date: Mon, 25 Jan 1993 22:42:26 GMT

Hi pros:

This may be the FAQ but I really need someone's help.

If a line of text data contains vary fields, say range from 4 to 32, what is
the easiest way to get every field.  Any way similar to UNIX set command to
get $1..$n?  For example: a line contains "Thu Jan 21 1993  21:22:00", I 
suppose can use splite to know number of fields, but then how to use "for" or
"while" loop to get each field assign to other variables?

Any help will be appreciated.
-- 
Vincent Mar   vince@digibd.com                  
DigiBoard, Digi International Inc.              
6400 Flying Cloud Drive       Tel: (612)943-9020
Eden Prairie, MN 55344        Fax: (612)943-0803
Newsgroups: comp.lang.perl
From: pete@smtl.demon.co.uk (Pete Phillips)
Subject: ftpget package - why doesn't it work ?
X-Address: Bridgend, S. Wales, CF31 1JP
Reply-To: pete@smtl.demon.co.uk
Organization: Surgical Materials Testing Laboratory
X-Fax: +44 656 667291
X-Phone: +44 656 652166
Apparently-To: mail2news@news.demon.co.uk
Date: Tue, 26 Jan 1993 11:18:08 +0000


I've just installed Gene Spaffords ftpget package, so that we could
queue ftp transfers overnight.

It doesn't seem to work, and I don't know enough about ftp and the
internet to find out why.

We have a sun sparc II with 4.1.1B, perl 4.035, and a dial up ppp
connection to demon.co.uk.  Ftp and telnet work fine (eg: I can do

	ftp gate.demon.co.uk
	
and do anon ftp with no problems.  However, running the following:

	enterprise:[~pete] % ftpls -l gate.demon.co.uk  /pub

gives me:

	Unable to connect to gate.demon.co.uk ftp port: Connection timed out 
	at /usr/local/bin/ftpls line 48.

Any help appreciated as always,
Pete
-- 
Pete Phillips, Deputy Director, Surgical Materials Testing Lab, 
Bridgend General Hospital, S. Wales. 0656-652166 pete@smtl.demon.co.uk   
--
"Ian Snodin, who played as one of a three-man back four in the first half .."
Newsgroups: comp.lang.perl
From: dick@hpqmoitl.sqf.hp.com (Dick Middleton)
Subject: HELP: with usersub callback
Date: Wed, 27 Jan 1993 16:56:41 GMT
Organization: Hewlett-Packard LTD, South Queensferry, Scotland
X-Newsreader: TIN [version 1.1.4 PL7]

--

I need some help to get the callback feature of usersubs going. The problem I
have is with the stack and stack pointer. How does it work? The documentation
is quite adamant that I refetch the stack pointer after using the routines
and I need to know what it is to pass back parameters but I don't understand
where it comes from, how to get it or how it works (what exactly do sp and st
do?)

Any enlightenment would be gratefully received.

Dick.


******************************************************************************
  Dick Middleton                                Phone: (+44 | 0) 31-331 7530
  Manufacturing Engineering                          Unix mail: dick@hpqtdma
  Queensferry Telecom Division                           HP Desk: /HP1400/UM
  H E W L E T T - P A C K A R D                             Telnet: 313-2530
******************************************************************************
Newsgroups: comp.lang.perl
From: jja@fnbc.com (Joseph Alotta)
Subject: 2 way pipe sample program
Keywords: pipe
Organization: First National Bank Of Chicago, Chicago IL, USA
Date: Wed, 27 Jan 93 17:04:54 GMT

greetings,

sorry if this is a FAQ. 

i want to open a pipe to an interpretive
kind of calculator program.

it take a few seconds to start it up, so i
want to keep it going and feed it lines
via perl and read back the answer.

i know there is something out there called
open2 and probably and open3 by now, but
i've never been able to figure out how
to use it.

can some kind person share with me a simple
sample program that does this sort of thing?


joe.

--
==============================================================
! joe alotta                                    jja@fnbc.com !                                               
!                                             (312) 732-3439 !
!                                                            !
! "The main thing is to keep the main thing the main thing." !
! Dr. George Sweeney                                         !
==============================================================
Newsgroups: comp.lang.perl
From: chicken@npac.syr.edu (Mark R. Levinson)
Subject: Signal names vs. signal numbers
Organization: NPAC, Syracuse University - Syracuse, New York
Date: Tue, 26 Jan 93 11:03:00 EST


I'm writing a script in which I use perl's kill function to send signals to a
process group, which has led to a bit of a dilemma. Generally kill can take a
signal name (rather than a number) as its first argument, e.g.:

	kill 'STOP', $$;

But in order to signal a process group rather than a single process, the
signal must be negative. This seems to imply that for this purpose signals
_must_ be given as numbers rather than names. Unfortunately, the signal
numbers I'm interested in are not portable across the different operating
systems I'm using, so it would be vastly preferable to refer to the signals by
name instead.

Is there some trick that allows the use of "negative" signal names with kill?
Failing that, is there any easy way to convert a signal name to its
corresponding number within a script? (I suppose I could always search through
/usr/include/{sys/,}signal.h, but that seems rather ugly.)

Thanks for any thoughts....

--
Mark R. Levinson
Northeast Parallel Architectures Center
Syracuse University
From: guenther@iras5.ira.uka.de (Guenther Schreiner)
Newsgroups: comp.lang.perl
Subject: Passing associative arrays to C
Date: 27 Jan 1993 11:10:27 GMT
Organization: University of Karlsruhe, FRG
Distribution: world
NNTP-Posting-Host: iras5.ira.uka.de
Keywords: PERL-C-interface

We need help in passing associative arrays from and to C functions
(PERL extensions). Any ideas ?


Regards,
 Guenther

--
 Guenther Schreiner                     | University of Karlsruhe, Germany
  c/o Fakultaet fuer Informatik      ---+---
  Am Fasanengarten 5                    | Phone:    (+49) 721 608-3980
  7500 Karlsruhe 1                      | FAX:      (+49) 721 699284
                                        | INTERNET: guenther@ira.uka.de
 X.400: G=Guenther/S=Schreiner/OU=Informatik/PRMD=UNI-KARLSRUHE/ADMD=DBP/C=DE/;
--
Newsgroups: comp.lang.perl
From: dichter@chdasic.sps.mot.com (Carl Dichter)
Subject: Re: perl support
Organization: Motorola ASIC Division, Chandler AZ
Date: Thu, 21 Jan 1993 22:48:15 GMT

In article <UfLXsne00XQDQcUx4P@andrew.cmu.edu>, Tod McQuillin <tm8t+@andrew.cmu.edu> writes:
>This reminds me of something I've been meaning to bring up for a
>while.  Why don't we put together a Perl service directory, listing
>individuals and companies who are willing to support Perl, free or for
>a fee, like the etc/SERVICE file in the Emacs distribution?  This
>strikes me as a good way to add credibility for the benefit of people
>like Bob mentions above, as well as a nice way for some of us to earn
>a little extra income.
>
>If anyone is interested in maintaining such a file, please speak up.
>If no one offers to do it within a week or so, I'll offer to do it
>myself, if the consensus is that it's a good idea.

I've been collecting a listing of Perl gurus, books/authors, and other 
resources. This includes people who aren't gurus-- they just want to 
help others learn perl.

I'll be posting the listing when it's substantial enough, and
including it with course notes at Motorola and at
Software Development '93.

If you want to be listed, send me your information:

- Description of products or services offered.
- company name
- contact name
- street address
- 800 and non-800 (for international customers) phone numbers
- FAX numbers
- email address

----------------------
Carl R. Dichter               "iwannanugui"
Motorola ASIC Division
email: dichter@chdasic.sps.mot.com
* A native of Phoenix-- that's why you can't place the accent. *
Newsgroups: comp.lang.perl
From: Tom Christiansen <tchrist@convex.COM>
Subject: Re: Generating reports
Originator: tchrist@pixel.convex.com
Date: Fri, 22 Jan 1993 14:08:26 GMT
Reply-To: tchrist@convex.COM (Tom Christiansen)
Organization: Convex Computer Corporation, Colorado Springs, CO
X-Disclaimer: This message was written by a user at CONVEX Computer
              Corp. The opinions expressed are those of the user and
              not necessarily those of CONVEX.

From the keyboard of flee@cs.psu.edu (Felix Lee):
:* duplicates information (like output column order) in several places
:in the script, which makes it painful to make minor changes in the
:report.

I'd have to see what you're doing, although I certainly take your
word for it.  I'd say in general that you probably need to introduce 
another level on indirection for your indicies, i.e. output column order.

:* ends up simulating data types like records and arrays of records in
:really painful ways.

Surely, Felix, you of all people, perhaps not even excepting myself, 
have plenty of ways of doing this.  You can use associative arrays and 
joined keys, you can use the list of lists via pointers thing, or if you
really want records, you can use the c2ph-style classes or do what plum
does with its folder caching (see &activate_folder).  If you encapsulate
these in subroutine calls, I'm not sure why they're "really painful".

:Something I haven't tried yet: generating Perl on the fly.  Perhaps
:this is the best way to deal with Perl's inadequacies in general.

Eval covers a multitude of sins.

:Another problem is Perl doesn't have enough date/time support,
:something that comes up all the time in analyzing log files.  

I use the Cnews getdate function all the time for this.  Does
it somehow not suffice?

--tom
-- 
    Tom Christiansen      tchrist@convex.com      convex!tchrist
    No, I'm not going to explain it.  If you can't figure it out, you didn't
    want to know anyway...  :-)
            --Larry Wall in <1991Aug7.180856.2854@netlabs.com>
From: mjo@iao.ford.com (Mike O'Connor)
Newsgroups: comp.lang.perl
Subject: Re: HELP: perl on DECstation 5000 (ULTRIX 4.3)
Date: 26 Jan 1993 22:28:08 GMT
Organization: Not an official spokesperson for Ford Motor Company
Distribution: world
Reply-To: Mike O'Connor <mjo@fmsrl7.srl.ford.com>
NNTP-Posting-Host: localhost

In article <1k1miuINNli3@elroy.jpl.nasa.gov>
bob@cliff.NoSubdomain.NoDomain (Bob Palermo) writes:
    ^^^^^^^^^^^^^^^^^^^^^^^^^^

You need to have xrn fixed.

:Included below are the steps I have taken in my attempts to build perl,
:the output generated when I tried to "make" perl, and the config.sh file
:that was generated when I ran Configure.

After you run "Configure" and before you run "make", change the
following line in config.sh

from:  d_volatile='define'
to:    d_volatile='undef'

Then things should work.

-- 
 Michael J. O'Connor           |  Internet:  mjo@fmsrl7.srl.ford.com
 Ford Motor Company, OPEO      |  UUCP:      ...!{backbone}!fmsrl7!mjo
 20000 Rotunda, Bldg. 1-3001   |  Phone:     +1 (313) 248-1260
 Dearborn, MI  48121           |  Fax:       +1 (313) 323-6277
Newsgroups: comp.lang.perl
From: Tom Christiansen <tchrist@convex.COM>
Subject: Re: month in localtime?
Originator: tchrist@pixel.convex.com
Date: Fri, 22 Jan 1993 13:57:42 GMT
Reply-To: tchrist@convex.COM (Tom Christiansen)
Organization: Convex Computer Corporation, Colorado Springs, CO
Keywords: time,month
X-Disclaimer: This message was written by a user at CONVEX Computer
              Corp. The opinions expressed are those of the user and
              not necessarily those of CONVEX.

From the keyboard of jja@fnbc.com (Joseph Alotta):
:how does one get the month out in localtime?
:this one's right out of the book:
:
:#!/usr/local/bin/perl  
:($sec,$min,$hour,$mday,$mon,$year,$wday,$yday,$isdst) = localtime(time);
:print "$sec,$min,$hour,$mday,mon=$mon,$year,$wday,$yday,$isdst\n";
:exit;
:
:amy{jja}44: headline.prl
:19,52,14,20,mon=0,93,3,19,0
:amy{jja}45: date
:Wed Jan 20 14:52:21 CST 1993


# I make both 0 and 7 be Sunday cause some folks are confused
$wname = (Sun,Mon,Tue,Wed,Thu,Fri,Sat,Sun)[$wday]; 

$mname = (Jan,Feb,Mar,Apr,May,Jun,Jul,Aug,Sep,Oct,Nov,Dec)[$mon];

--tom
-- 
    Tom Christiansen      tchrist@convex.com      convex!tchrist
    "...this does not mean that some of us should not want, in a rather
    dispassionate sort of way, to put a bullet through csh's head."
		Larry Wall in <1992Aug6.221512.5963@netlabs.com>