10 More Discussions You Might Find Interesting
1. Shell Programming and Scripting
Hi All,
i have problem here whenever i run this perl script that is pasted here, it inserts a negative number in place of PO_nbr
.
What the script does is reads a pipe delimited file and then using some values on the file it will query db to get few other values and then it inserts the... (4 Replies)
Discussion started by: selvankj
4 Replies
2. Shell Programming and Scripting
Hi,
I have a very long pipe delimited string. The length of the string could vary. For example:
START|one|two|three|four|five|six|seven
START|one|two|three|four|five|six|seven|eight|nine
START|one|two|three|four
I want to replace in the third occurence of string with another... (9 Replies)
Discussion started by: som.nitk
9 Replies
3. Shell Programming and Scripting
I am trying to insert a picture into a worksheet in Excel using Perl the following is the code
use Win32::OLE;
use Win32::OLE::Const "Microsoft Excel";
use Win32::OLE qw(in with);
# Initiate Excel application
$Excel = Win32::OLE->new('Excel.Application', 'Quit');
$Excel->{Visible} =1;
#... (1 Reply)
Discussion started by: cold_Que
1 Replies
4. Shell Programming and Scripting
hi there, my mysql database has a date/time field using the standard mysql date|time format of
2009-08-31 00:16:44
when inserting into this field using perl DBI, is there is an easy way to insert the current date/time in without having to preformat the date/time string in perl before... (3 Replies)
Discussion started by: hcclnoodles
3 Replies
5. Shell Programming and Scripting
Hey,
I have 10 lines of text ... And I would like to Insert prefix for each line with static text.
perl -pi -e 's/()/$1 TEST$./' data.txt
Each line will have different static prefix, Code above works perfectly for 1st line ... I'm just not sure how I can run same command for 2nd line 3rd... (4 Replies)
Discussion started by: NDxiak
4 Replies
6. UNIX for Advanced & Expert Users
I have a requirement:
I got a perfect example in this forum and looks like it would be quite similar but I have an additional task to do. I would explain.
I have a file x.csv
client_id,client_nbr
ABC,1250
CDE,1520
EFG,1000
PQR,1800
I have a file y.csv
client_id,client_nbr
ABC,1000... (0 Replies)
Discussion started by: RubinPat
0 Replies
7. Shell Programming and Scripting
I need a perl script to find and replace a specific pattern in a file to a new line.
BAsically I have a single line data in a file with 10 mb to 200 MB. I want to put a new line based on a specific pattern to open the file in Excel / Access.
Following is the sample data in a file
... (1 Reply)
Discussion started by: portalfaq
1 Replies
8. Shell Programming and Scripting
I've got the following code
sub mail_report {
$Mailer = '/usr/sbin/sendmail joe@somewhere.net';
open MAIL,"|$Mailer";
print MAIL "Subject: $X connection attempt \n";
open MESSAGE, "<$outdir$X";
print MESSAGE '$outdir$X\n';
close MESSAGE;
close MAIL;
} #End... (2 Replies)
Discussion started by: thumper
2 Replies
9. Shell Programming and Scripting
Hi all.
I am using /bin/sh on an HPUX system.
I have a file, with records as such:
60701006000000030380000000000000030380000400000000000
61001006000000008220000000000000008220000100000000000
61201006000000030150000000000000030150001000000000000
I know the character counts which... (5 Replies)
Discussion started by: lyoncc
5 Replies
10. Shell Programming and Scripting
Is it possible to make a perl or cgi script that does the following ?
1) have a stopwatch with a start / start / pause feature and record the time its paused on. but be able to record up to ten different times
2)print the recorded time to .txt file (1 Reply)
Discussion started by: perleo
1 Replies
Sys::Utmp::Utent(3pm) User Contributed Perl Documentation Sys::Utmp::Utent(3pm)
NAME
Sys::Utmp::Utent - represent a single utmp entry
SYNOPSIS
use Sys::Utmp;
my $utmp = Sys::Utmp->new();
while ( my $utent = $utmp->getutent() )
{
if ( $utent->user_process )
{
print $utent->ut_user,"
";
}
}
$utmp->endutent;
DESCRIPTION
As described in the Sys::Utmp documentation the getutent method returns an object of the type Sys::Utmp::Utent which provides methods for
accessing the fields in the utmp record. There are also methods for determining the type of the record.
The access methods relate to the common names for the members of the C struct utent - those provided are the superset from the Gnu
implementation and may not be available on all systems: where they are not they will return the empty string.
ut_user
Returns the use this record was created for if this is a record for a user process. Some systems may return other information
depending on the record type. If no user was set this will be the empty string. If tainting is switched on with the '-T' switch to
perl then this will be 'tainted' as it is possible that the user name came from an untrusted source.
ut_id
The identifier for this record - it might be the inittab tag or some other system dependent value.
ut_line
For user process records this will be the name of the terminalor line that the user is connected on.
ut_pid
The process ID of the process that created this record.
ut_type
The type of the record this will have a value corresponding to one of the constants (not all of these may be available on all systems
and there may well be others which should be described in the getutent manpage or in /usr/include/utmp.h ) :
ACCOUNTING - record was created for system accounting purposes.
BOOT_TIME - the record was created at boot time.
DEAD_PROCESS - The process that created this record has terminated.
EMPTY - record probably contains no other useful information.
INIT_PROCESS - this is a record for process created by init.
LOGIN_PROCESS - this record was created for a login process (e.g. getty).
NEW_TIME - record created when the system time has been set.
OLD_TIME - record recording the old tme when the system time has been set.
RUN_LVL - records the time at which the current run level was started.
USER_PROCESS - record created for a user process (e.g. a login )
for convenience Sys::Utmp::Utent provides methods which are lower case versions of the constant names which return true if the record
is of that type.
ut_host
On systems which support this the method will return the hostname of the host for which the process that created the record was started
- for example for a telnet login. If taint checking has been turned on (with the -T switch to perl ) then this value will be tainted
as it is possible that a remote user will be in control of the DNS for the machine they have logged in from. ( see perlsec for more on
tainting )
ut_time
The time in epoch seconds wt which the record was created.
BUGS
Probably. This module has been tested on Linux, Solaris, FreeBSD ,SCO Openserver and SCO UnixWare and found to work on those platforms.
If you have difficulty building the module or it doesnt behave as expected then please contact the author including if appropriate your
/usr/include/utmp.h
AUTHOR
Jonathan Stowe, <jns@gellyfish.com>
LICENCE
This Software is Copyright Jonathan Stowe 2001-2006
This Software is published as-is with no warranty express or implied.
This is free software and can be distributed under the same terms as Perl itself.
SEE ALSO
perl. Sys::Utmp::Utent
perl v5.14.2 2006-10-13 Sys::Utmp::Utent(3pm)