Perl module script to draw speedometer/gauge graphs

10 More Discussions You Might Find Interesting

1. Shell Programming and Scripting

Perl script module

I took the copy of the production module to the home directory and executing the module. one of the test prdmsk.pm module is present in the home directory ctskk. would like to know whether the below syntax is correct. use strict; use lib "/home/ssprod/ctskk"; use lib::Prdmsk; ...

2. Shell Programming and Scripting

Putting s Perl module into your own script

Hi We have to create a perl script..for part of a project I ceated a script that called another perl module use AppUtil::VMUtil; But have been told that we need to incorpurate that module into my script...(with comments) Would you know how to copy or place a module from one script...

3. Shell Programming and Scripting

calling perl subroutine from perl expect module

All, Is it possible to call a subroutine from the perl expect module after logging to a system that is within the same program. My situation is I need to run a logic inside a machine that I'm logging in using the expect module, the logic is also available in the same expect program. Thanks,...

4. Shell Programming and Scripting

using Perl with rrdtool to create and update graphs

Hi guys, im having real difficulty getting my head around perl and rrdtool and was hoping someone could help I want to run a perl script from cron which retrieves the data every 5 mins, creates .rrd's if not already created, and updates the DS from the reultsHash or $key, then creates the...

5. Shell Programming and Scripting

How to call a shell script from a perl module which uses Filehandle to login

Hi Guru's, Pardon me for the breach of rules..... I have very little knowledge about Shell Programming and Scripting hope you guys help me out of this troble I have very little time hence could not find the right way to direct my queries. coming to the problem I need to call a...

6. Shell Programming and Scripting

Is it possible to draw table/matrix using shell script?

Hi all, I need to create a matrix of variable rows and columns. Right now i have 3 rows and two columns and following values. Output something like TypeA TypeB TestCase1 Pass Fail TestCase2 Pass ...

7. Shell Programming and Scripting

Making a progress gauge in a bash script

Hello once again: One thing that seems to be a nice feature is a progress gauge... so I can see how long an operation will take for a task to complete if it is requiring a lot of processing or the file is enormous. I have seen references to gauge operations, but I don't know anything about it or...

8. UNIX for Dummies Questions & Answers

Howto locate locally installed Perl module for a CGI script in APACHE .htaccess

Hi, I have the following simple CGI script, just containg header: #!/usr/bin/perl -w use CGI ':standard'; use lib "/home/myname/lib/perl5/site_perl/5.8.5/"; use Mail::Sendmail; I also have included this directive in ~/public_html/.htaccess : SetEnv PERL5LIB...

9. Shell Programming and Scripting

Replace Perl Module name in all Perl scripts

I want to replace a Perl module name in all my Perl Scripts in the cgi-bin directory. How is it possible? I have the following statement in my scripts use myUtil; I want to change it to use myUtil777; Regards, Rahul

10. Shell Programming and Scripting

Correct Syntax For Calling Shell Script in Perl Module

Problem: I have a shell script that will be called by a Perl module that will connect to a db and delete rows. The Perl module will be called by CRON. I am using a Perl module to call a shell script because I need to get the db connection from Perl. Here is the Perl pseudocode: ...

LEARN ABOUT DEBIAN

graph::writer

Graph::Writer(3pm)					User Contributed Perl Documentation					Graph::Writer(3pm)

NAME

       Graph::Writer - base class for Graph file format writers

SYNOPSIS

	 package Graph::Writer::MyFormat;
	 use Graph::Writer;
	 use vars qw(@ISA);
	 @ISA = qw(Graph::Writer);

	 sub _write_graph
	 {
	   my ($self, $graph, $FILE) = @_;

	   # write $graph to $FILE
	 }

DESCRIPTION

       Graph::Writer is a base class for Graph file format writers.  A particular subclass of Graph::Writer will handle a specific file format,
       and generate a Graph, represented using Jarkko Hietaniemi's Graph class.

       You should never create an instance of this class yourself, it is only meant for subclassing. If you try to create an instance of
       Graph::Writer, the constructor will throw an exception.

METHODS

   new()
       Constructor - generate a new writer instance. This is a virtual method, or whatever the correct lingo is.  You're not meant to call this on
       the base class, it is inherited by the subclasses. Ie if you do something like:

	 $writer = Graph::Writer->new();

       It will throw an exception.

   write_graph()
       Read a graph from the specified file:

	 $graph = $writer->write_graph($file);

       The $file argument can either be a filename, or a filehandle for a previously opened file.

SUBCLASSING

       To create your own graph format writer, create a module which subclasses Graph::Writer. For example, suppose DGF is a directed graph format
       - create a Graph::Writer::DGF module, with the following structure:

	 package Graph::Writer::DGF;

	 use Graph::Writer;
	 use vars qw(@ISA);
	 @ISA = qw(Graph::Writer);

	 sub _write_graph
	 {
	   my $self  = shift;
	   my $graph = shift;
	   my $FILE  = shift;

	   while (<$FILE>)
	   {
	   }

	   return 1;
	 }

	 1;

       Note the leading underscore on the _write_graph() method.  The base class provides the public method, and invokes the private method which
       you're expected to provide, as above.

       If you want to perform additional initialisation at construction time, you can provide an _init() method, which will be invoked by the base
       class's constructor.  You should invoke the superclass's initialiser as well, as follows:

	 sub _init
	 {
	   my $self = shift;

	   $self->SUPER::_init();

	   # your initialisation here
	 }

       Someone can then use your class as follows:

	 use Graph::Writer::DGF;

	 $writer = Graph::Writer::DGF->new();
	 $writer->write_graph($graph, 'foo.dgf');

SEE ALSO

       Graph
	   Jarkko Hietaniemi's modules for representing directed graphs, available from CPAN under modules/by-module/Graph/

       Algorithms in Perl
	   The O'Reilly book has a chapter on directed graphs, which is based around Jarkko's modules.

       Graph::Writer::Dot
	   A simple subclass of this class for writing graphs in the file format used by dot, which is part of the graphviz package from AT&T.

       Graph::Writer::VCG
	   A simple subclass of this class for writing graphs in the file format used by VCG, a tool for visualising directed graphs, initially
	   developed for visualising compiler graphs.

       Graph::Writer::XML
	   A simple subclass of this class for writing graphs as XML, using a simple graph markup.

       Graph::Reader
	   A baseclass for Graph file format readers.

AUTHOR

       Neil Bowers <neil@bowers.com>

COPYRIGHT

       Copyright (c) 2001-2012, Neil Bowers. All rights reserved.  Copyright (c) 2001, Canon Research Centre Europe. All rights reserved.

       This script is free software; you can redistribute it and/or modify it under the same terms as Perl itself.

perl v5.14.2							    2012-02-14							Graph::Writer(3pm)

Shell Programming and Scripting