Sponsored Content
Full Discussion: General Purpose Date Script
Top Forums UNIX for Beginners Questions & Answers General Purpose Date Script Post 302884036 by drl on Friday 17th of January 2014 08:01:22 AM
Old 01-17-2014
Hi.

Thanks for taking the time to do this.

I usually add warnings and strict to help avoid errors. Adding those yields:
Code:
Global symbol "$offset" requires explicit package name at ./date.pl line 99.  (about 10 times).

and
Code:
$ ./date.pl 
Use of uninitialized value $input in split at ./date.pl line 65.
Use of uninitialized value $offset in multiplication (*) at ./date.pl line 144.

The line numbers reflect the addition of lines for use strict; and use warnings;

Best wishes ... cheers, drl
This User Gave Thanks to drl For This Post:
 

8 More Discussions You Might Find Interesting

1. UNIX for Dummies Questions & Answers

Looking for a general purpose System Monitor

Does anyone have any scripts or suggestions on a general purpose Unix/Linux monitoring tool? (5 Replies)
Discussion started by: darthur
5 Replies

2. UNIX for Dummies Questions & Answers

whats the purpose of the following script?

whats the purpose of the following script? who could run it? To what is the script refering that exceeds 75%? The mailbox? What does sed 's/%//' do? (1 Reply)
Discussion started by: vrn
1 Replies

3. Shell Programming and Scripting

General Q: how to run/schedule a php script from cron jobs maybe via bash from shell?

Status quo is, within a web application, which is coded completely in php (not by me, I dont know php), I have to fill out several fields, and execute it manually by clicking the "go" button in my browser, several times a day. Thats because: The script itself pulls data (textfiles) from a... (3 Replies)
Discussion started by: lowmaster
3 Replies

4. Shell Programming and Scripting

awk (?) help or just general script

I have two files (___ represents blanks) Foo1 1000 345 456 1001 876 908 1002 ___ 786 1003 643 908 1004 345 234 and Foo2 1000 345 1001 876 1002 111 1003 643 1004 345 (3 Replies)
Discussion started by: garethsays
3 Replies

5. Shell Programming and Scripting

script to fill up disk space for testing purpose

Hello everyone I am new to this forum I am working on a project and needed a test script to fill up a disk partition /tmp/data to see how the program fails. The system I am working on is a redhat 5.3. Is there anything out there? Thanks. (10 Replies)
Discussion started by: dp100022
10 Replies

6. UNIX for Dummies Questions & Answers

Purpose of - (hypen) in script or command line

Hi, I am new for unix and I am following ABS guide. What is the purpose of - (hypen ) in the below command and What it will do in this?. Can anyone explain it in detail. Rest of the things in the below command I understood somewhat. (cd /source/directory && tar cf - . ) | (cd /dest/directory &&... (1 Reply)
Discussion started by: gwgreen1
1 Replies

7. Shell Programming and Scripting

Script to determine Date,TotalFile,total size of file based on date

I have file listed like below -rw-r--r--+ 1 test test 17M Nov 26 14:43 test1.gz -rw-r--r--+ 1 test test 0 Nov 26 14:44 test2.gz -rw-r--r--+ 1 test test 0 Nov 27 10:41 test3.gz -rw-r--r--+ 1 test test 244K Nov 27 10:41 test4.gz -rw-r--r--+ 1 test test 17M Nov 27 10:41 test5.gz I... (5 Replies)
Discussion started by: krish2014
5 Replies

8. UNIX for Beginners Questions & Answers

General Purpose XML Processing

I've been kicking this around for a while now, I might as well post it here. v0.0.9, now properly supporting self-closing tags. v0.0.8, an important quoting fix and a minor change which should handle special <? <!-- etc. tags without seizing up as often. Otherwise the code hasn't changed much.... (6 Replies)
Discussion started by: Corona688
6 Replies
IO::Async::Protocol::Stream(3pm)			User Contributed Perl Documentation			  IO::Async::Protocol::Stream(3pm)

NAME
"IO::Async::Protocol::Stream" - base class for stream-based protocols SYNOPSIS
Most likely this class will be subclassed to implement a particular network protocol. package Net::Async::HelloWorld; use strict; use warnings; use base qw( IO::Async::Protocol::Stream ); sub on_read { my $self = shift; my ( $buffref, $eof ) = @_; return 0 unless $$buffref =~ s/^(.*) //; my $line = $1; if( $line =~ m/^HELLO (.*)/ ) { my $name = $1; $self->invoke_event( on_hello => $name ); } return 1; } sub send_hello { my $self = shift; my ( $name ) = @_; $self->write( "HELLO $name " ); } This small example elides such details as error handling, which a real protocol implementation would be likely to contain. DESCRIPTION
This subclass of IO::Async::Protocol is intended to stand as a base class for implementing stream-based protocols. It provides an interface similar to IO::Async::Stream, primarily, a "write" method and an "on_read" event handler. It contains an instance of an "IO::Async::Stream" object which it uses for actual communication, rather than being a subclass of it, allowing a level of independence from the actual stream being used. For example, the stream may actually be an IO::Async::SSLStream to allow the protocol to be used over SSL. As with "IO::Async::Stream", it is required that by the time the protocol object is added to a Loop, that it either has an "on_read" method, or has been configured with an "on_read" callback handler. EVENTS
The following events are invoked, either using subclass methods or CODE references in parameters: $ret = on_read $buffer, $eof The "on_read" handler is invoked identically to "IO::Async::Stream". on_closed The "on_closed" handler is optional, but if provided, will be invoked after the stream is closed by either side (either because the "close()" method has been invoked on it, or on an incoming EOF). PARAMETERS
The following named parameters may be passed to "new" or "configure": on_read => CODE CODE reference for the "on_read" event. handle => IO A shortcut for the common case where the transport only needs to be a plain "IO::Async::Stream" object. If this argument is provided without a "transport" object, a new "IO::Async::Stream" object will be built around the given IO handle, and used as the transport. METHODS
$protocol->write( $data ) Writes the given data by calling the "write" method on the contained transport stream. $protocol->connect( %args ) Sets up a connection to a peer, and configures the underlying "transport" for the Protocol. Calls "IO::Async::Protocol" "connect" with "socktype" set to "stream". AUTHOR
Paul Evans <leonerd@leonerd.org.uk> perl v5.14.2 2012-10-24 IO::Async::Protocol::Stream(3pm)
All times are GMT -4. The time now is 10:12 PM.
Unix & Linux Forums Content Copyright 1993-2022. All Rights Reserved.
Privacy Policy