mirror of
https://github.com/dkogan/feedgnuplot.git
synced 2025-05-05 14:04:49 +08:00
renamed main script feedGnuplot -> feedgnuplot
This commit is contained in:
parent
d9c1f07c18
commit
0fac942acf
2
MANIFEST
2
MANIFEST
@ -1,5 +1,5 @@
|
|||||||
Makefile.PL
|
Makefile.PL
|
||||||
MANIFEST
|
MANIFEST
|
||||||
bin/feedGnuplot
|
bin/feedgnuplot
|
||||||
t/00-load.t
|
t/00-load.t
|
||||||
t/manifest.t
|
t/manifest.t
|
||||||
|
16
Makefile.PL
16
Makefile.PL
@ -9,33 +9,33 @@ sub MY::libscan
|
|||||||
|
|
||||||
my ($self, $file) = @_;
|
my ($self, $file) = @_;
|
||||||
|
|
||||||
# Don't install the README.pod or any non-feedGnuplot .pl file
|
# Don't install the README.pod or any non-feedgnuplot .pl file
|
||||||
return undef if $file !~ /feedGnuplot.pl/ && $file =~ /\.pl$|^README.pod/;
|
return undef if $file !~ /feedgnuplot.pl/ && $file =~ /\.pl$|^README.pod/;
|
||||||
|
|
||||||
return $self->SUPER::libscan ($file);
|
return $self->SUPER::libscan ($file);
|
||||||
}
|
}
|
||||||
|
|
||||||
WriteMakefile
|
WriteMakefile
|
||||||
(
|
(
|
||||||
NAME => 'feedGnuplot',
|
NAME => 'feedgnuplot',
|
||||||
AUTHOR => q{Dima Kogan <dkogan@cds.caltech.edu>},
|
AUTHOR => q{Dima Kogan <dkogan@cds.caltech.edu>},
|
||||||
VERSION_FROM => 'bin/feedGnuplot',
|
VERSION_FROM => 'bin/feedgnuplot',
|
||||||
ABSTRACT_FROM => 'bin/feedGnuplot',
|
ABSTRACT_FROM => 'bin/feedgnuplot',
|
||||||
($ExtUtils::MakeMaker::VERSION >= 6.3002
|
($ExtUtils::MakeMaker::VERSION >= 6.3002
|
||||||
? ('LICENSE' => 'perl')
|
? ('LICENSE' => 'perl')
|
||||||
: ()),
|
: ()),
|
||||||
PL_FILES => {},
|
PL_FILES => {},
|
||||||
EXE_FILES => [ 'bin/feedGnuplot' ],
|
EXE_FILES => [ 'bin/feedgnuplot' ],
|
||||||
PREREQ_PM => { 'Test::Script::Run' => 0},
|
PREREQ_PM => { 'Test::Script::Run' => 0},
|
||||||
dist => { COMPRESS => 'gzip -9f', SUFFIX => 'gz', },
|
dist => { COMPRESS => 'gzip -9f', SUFFIX => 'gz', },
|
||||||
clean => { FILES => 'feedGnuplot-*' },
|
clean => { FILES => 'feedgnuplot-*' },
|
||||||
);
|
);
|
||||||
|
|
||||||
# reroute the main POD into a separate README.pod if requested. This is here
|
# reroute the main POD into a separate README.pod if requested. This is here
|
||||||
# purely to generate a README.pod for the github front page
|
# purely to generate a README.pod for the github front page
|
||||||
if(exists $ARGV[0] && $ARGV[0] eq 'README.pod')
|
if(exists $ARGV[0] && $ARGV[0] eq 'README.pod')
|
||||||
{
|
{
|
||||||
open SCRIPT, 'bin/feedGnuplot' or die "Couldn't open main script";
|
open SCRIPT, 'bin/feedgnuplot' or die "Couldn't open main script";
|
||||||
open README, '>README.pod' or die "Couldn't open README.pod";
|
open README, '>README.pod' or die "Couldn't open README.pod";
|
||||||
while (<SCRIPT>)
|
while (<SCRIPT>)
|
||||||
{
|
{
|
||||||
|
24
README.pod
24
README.pod
@ -1,6 +1,6 @@
|
|||||||
=head1 NAME
|
=head1 NAME
|
||||||
|
|
||||||
feedGnuplot - A pipe-oriented frontend to Gnuplot
|
feedgnuplot - A pipe-oriented frontend to Gnuplot
|
||||||
|
|
||||||
=head1 SYNOPSIS
|
=head1 SYNOPSIS
|
||||||
|
|
||||||
@ -14,14 +14,14 @@ Simple plotting of stored data:
|
|||||||
10 25
|
10 25
|
||||||
|
|
||||||
$ seq 5 | awk '{print 2*$1, $1*$1}' |
|
$ seq 5 | awk '{print 2*$1, $1*$1}' |
|
||||||
feedGnuplot --lines --points --legend 0 "data 0" --title "Test plot" --y2 1
|
feedgnuplot --lines --points --legend 0 "data 0" --title "Test plot" --y2 1
|
||||||
|
|
||||||
Simple real-time plotting example: plot how much data is received on the wlan0
|
Simple real-time plotting example: plot how much data is received on the wlan0
|
||||||
network interface in bytes/second (uses bash, awk and Linux):
|
network interface in bytes/second (uses bash, awk and Linux):
|
||||||
|
|
||||||
$ while true; do sleep 1; cat /proc/net/dev; done |
|
$ while true; do sleep 1; cat /proc/net/dev; done |
|
||||||
awk '/wlan0/ {if(b) {print $2-b; fflush()} b=$2}' |
|
awk '/wlan0/ {if(b) {print $2-b; fflush()} b=$2}' |
|
||||||
feedGnuplot --lines --stream --xlen 10 --ylabel 'Bytes/sec' --xlabel seconds
|
feedgnuplot --lines --stream --xlen 10 --ylabel 'Bytes/sec' --xlabel seconds
|
||||||
|
|
||||||
=head1 DESCRIPTION
|
=head1 DESCRIPTION
|
||||||
|
|
||||||
@ -30,10 +30,10 @@ plots from data coming in on STDIN or given in a filename passed on the
|
|||||||
commandline. Various data representations are supported, as is hardcopy
|
commandline. Various data representations are supported, as is hardcopy
|
||||||
output and streaming display of live data. A simple example:
|
output and streaming display of live data. A simple example:
|
||||||
|
|
||||||
$ seq 5 | awk '{print 2*$1, $1*$1}' | feedGnuplot
|
$ seq 5 | awk '{print 2*$1, $1*$1}' | feedgnuplot
|
||||||
|
|
||||||
You should see a plot with two curves. The C<awk> command generates some data to
|
You should see a plot with two curves. The C<awk> command generates some data to
|
||||||
plot and the C<feedGnuplot> reads it in from STDIN and generates the plot. The
|
plot and the C<feedgnuplot> reads it in from STDIN and generates the plot. The
|
||||||
C<awk> invocation is just an example; more interesting things would be plotted
|
C<awk> invocation is just an example; more interesting things would be plotted
|
||||||
in normal usage. No commandline-options are required for the most basic
|
in normal usage. No commandline-options are required for the most basic
|
||||||
plotting. Input parsing is flexible; every line need not have the same number of
|
plotting. Input parsing is flexible; every line need not have the same number of
|
||||||
@ -64,7 +64,7 @@ a plain data point like the others. Default is C<--nodomain>. Thus the original
|
|||||||
example above produces 2 curves, with B<1,2,3,4,5> as the I<X>-values. If we run
|
example above produces 2 curves, with B<1,2,3,4,5> as the I<X>-values. If we run
|
||||||
the same command with --domain:
|
the same command with --domain:
|
||||||
|
|
||||||
$ seq 5 | awk '{print 2*$1, $1*$1}' | feedGnuplot --domain
|
$ seq 5 | awk '{print 2*$1, $1*$1}' | feedgnuplot --domain
|
||||||
|
|
||||||
we get only 1 curve, with B<2,4,6,8,10> as the I<X>-values. As many points as
|
we get only 1 curve, with B<2,4,6,8,10> as the I<X>-values. As many points as
|
||||||
desired can appear on a single line, but all points on a line are associated
|
desired can appear on a single line, but all points on a line are associated
|
||||||
@ -77,7 +77,7 @@ data is to be plotted. With the C<--dataid> option, each point is represented by
|
|||||||
2 values: a string identifying the curve, and the value itself. If we add
|
2 values: a string identifying the curve, and the value itself. If we add
|
||||||
C<--dataid> to the original example:
|
C<--dataid> to the original example:
|
||||||
|
|
||||||
$ seq 5 | awk '{print 2*$1, $1*$1}' | feedGnuplot --dataid --autolegend
|
$ seq 5 | awk '{print 2*$1, $1*$1}' | feedgnuplot --dataid --autolegend
|
||||||
|
|
||||||
we get 5 different curves with one point in each. The first column, as produced
|
we get 5 different curves with one point in each. The first column, as produced
|
||||||
by C<awk>, is B<2,4,6,8,10>. These are interpreted as the IDs of the curves to
|
by C<awk>, is B<2,4,6,8,10>. These are interpreted as the IDs of the curves to
|
||||||
@ -151,7 +151,7 @@ doing this: with a shebang (#!) or with inline perl data.
|
|||||||
A self-plotting, executable data file C<data> is formatted as
|
A self-plotting, executable data file C<data> is formatted as
|
||||||
|
|
||||||
$ cat data
|
$ cat data
|
||||||
#!/usr/bin/feedGnuplot --lines --points
|
#!/usr/bin/feedgnuplot --lines --points
|
||||||
2 1
|
2 1
|
||||||
4 4
|
4 4
|
||||||
6 9
|
6 9
|
||||||
@ -174,7 +174,7 @@ data file can be plotted simply with
|
|||||||
$ ./data
|
$ ./data
|
||||||
|
|
||||||
The caveats here are that on Linux the whole #! line is limited to 127 charaters
|
The caveats here are that on Linux the whole #! line is limited to 127 charaters
|
||||||
and that the full path to feedGnuplot must be given. The 127 character limit is
|
and that the full path to feedgnuplot must be given. The 127 character limit is
|
||||||
a serious limitation, but this can likely be resolved with a kernel patch. I
|
a serious limitation, but this can likely be resolved with a kernel patch. I
|
||||||
have only tried on Linux 2.6.
|
have only tried on Linux 2.6.
|
||||||
|
|
||||||
@ -188,7 +188,7 @@ create self-plotting files:
|
|||||||
use strict;
|
use strict;
|
||||||
use warnings;
|
use warnings;
|
||||||
|
|
||||||
open PLOT, "| feedGnuplot --lines --points" or die "Couldn't open plotting pipe";
|
open PLOT, "| feedgnuplot --lines --points" or die "Couldn't open plotting pipe";
|
||||||
while( <DATA> )
|
while( <DATA> )
|
||||||
{
|
{
|
||||||
my @xy = split;
|
my @xy = split;
|
||||||
@ -212,7 +212,7 @@ create self-plotting files:
|
|||||||
30 225
|
30 225
|
||||||
|
|
||||||
This is especially useful if the logged data is not in a format directly
|
This is especially useful if the logged data is not in a format directly
|
||||||
supported by feedGnuplot. Raw data can be stored after the __DATA__ directive,
|
supported by feedgnuplot. Raw data can be stored after the __DATA__ directive,
|
||||||
with a small perl script to manipulate the data into a useable format and send
|
with a small perl script to manipulate the data into a useable format and send
|
||||||
it to the plotter.
|
it to the plotter.
|
||||||
|
|
||||||
@ -330,7 +330,7 @@ As an example, if line 3 of the input is "0 9 1 20"
|
|||||||
How many extra values are given for each data point. Normally this
|
How many extra values are given for each data point. Normally this
|
||||||
is 0, and does not need to be specified, but sometimes we want
|
is 0, and does not need to be specified, but sometimes we want
|
||||||
extra data, like for colors or point sizes or error bars, etc.
|
extra data, like for colors or point sizes or error bars, etc.
|
||||||
feedGnuplot options that require this (colormap, circles)
|
feedgnuplot options that require this (colormap, circles)
|
||||||
automatically set it. This option is ONLY needed if unknown styles are
|
automatically set it. This option is ONLY needed if unknown styles are
|
||||||
used, with --curvestyleall for instance
|
used, with --curvestyleall for instance
|
||||||
|
|
||||||
|
@ -627,7 +627,7 @@ __END__
|
|||||||
|
|
||||||
=head1 NAME
|
=head1 NAME
|
||||||
|
|
||||||
feedGnuplot - A pipe-oriented frontend to Gnuplot
|
feedgnuplot - A pipe-oriented frontend to Gnuplot
|
||||||
|
|
||||||
=head1 SYNOPSIS
|
=head1 SYNOPSIS
|
||||||
|
|
||||||
@ -641,14 +641,14 @@ Simple plotting of stored data:
|
|||||||
10 25
|
10 25
|
||||||
|
|
||||||
$ seq 5 | awk '{print 2*$1, $1*$1}' |
|
$ seq 5 | awk '{print 2*$1, $1*$1}' |
|
||||||
feedGnuplot --lines --points --legend 0 "data 0" --title "Test plot" --y2 1
|
feedgnuplot --lines --points --legend 0 "data 0" --title "Test plot" --y2 1
|
||||||
|
|
||||||
Simple real-time plotting example: plot how much data is received on the wlan0
|
Simple real-time plotting example: plot how much data is received on the wlan0
|
||||||
network interface in bytes/second (uses bash, awk and Linux):
|
network interface in bytes/second (uses bash, awk and Linux):
|
||||||
|
|
||||||
$ while true; do sleep 1; cat /proc/net/dev; done |
|
$ while true; do sleep 1; cat /proc/net/dev; done |
|
||||||
awk '/wlan0/ {if(b) {print $2-b; fflush()} b=$2}' |
|
awk '/wlan0/ {if(b) {print $2-b; fflush()} b=$2}' |
|
||||||
feedGnuplot --lines --stream --xlen 10 --ylabel 'Bytes/sec' --xlabel seconds
|
feedgnuplot --lines --stream --xlen 10 --ylabel 'Bytes/sec' --xlabel seconds
|
||||||
|
|
||||||
=head1 DESCRIPTION
|
=head1 DESCRIPTION
|
||||||
|
|
||||||
@ -657,10 +657,10 @@ plots from data coming in on STDIN or given in a filename passed on the
|
|||||||
commandline. Various data representations are supported, as is hardcopy
|
commandline. Various data representations are supported, as is hardcopy
|
||||||
output and streaming display of live data. A simple example:
|
output and streaming display of live data. A simple example:
|
||||||
|
|
||||||
$ seq 5 | awk '{print 2*$1, $1*$1}' | feedGnuplot
|
$ seq 5 | awk '{print 2*$1, $1*$1}' | feedgnuplot
|
||||||
|
|
||||||
You should see a plot with two curves. The C<awk> command generates some data to
|
You should see a plot with two curves. The C<awk> command generates some data to
|
||||||
plot and the C<feedGnuplot> reads it in from STDIN and generates the plot. The
|
plot and the C<feedgnuplot> reads it in from STDIN and generates the plot. The
|
||||||
C<awk> invocation is just an example; more interesting things would be plotted
|
C<awk> invocation is just an example; more interesting things would be plotted
|
||||||
in normal usage. No commandline-options are required for the most basic
|
in normal usage. No commandline-options are required for the most basic
|
||||||
plotting. Input parsing is flexible; every line need not have the same number of
|
plotting. Input parsing is flexible; every line need not have the same number of
|
||||||
@ -691,7 +691,7 @@ a plain data point like the others. Default is C<--nodomain>. Thus the original
|
|||||||
example above produces 2 curves, with B<1,2,3,4,5> as the I<X>-values. If we run
|
example above produces 2 curves, with B<1,2,3,4,5> as the I<X>-values. If we run
|
||||||
the same command with --domain:
|
the same command with --domain:
|
||||||
|
|
||||||
$ seq 5 | awk '{print 2*$1, $1*$1}' | feedGnuplot --domain
|
$ seq 5 | awk '{print 2*$1, $1*$1}' | feedgnuplot --domain
|
||||||
|
|
||||||
we get only 1 curve, with B<2,4,6,8,10> as the I<X>-values. As many points as
|
we get only 1 curve, with B<2,4,6,8,10> as the I<X>-values. As many points as
|
||||||
desired can appear on a single line, but all points on a line are associated
|
desired can appear on a single line, but all points on a line are associated
|
||||||
@ -704,7 +704,7 @@ data is to be plotted. With the C<--dataid> option, each point is represented by
|
|||||||
2 values: a string identifying the curve, and the value itself. If we add
|
2 values: a string identifying the curve, and the value itself. If we add
|
||||||
C<--dataid> to the original example:
|
C<--dataid> to the original example:
|
||||||
|
|
||||||
$ seq 5 | awk '{print 2*$1, $1*$1}' | feedGnuplot --dataid --autolegend
|
$ seq 5 | awk '{print 2*$1, $1*$1}' | feedgnuplot --dataid --autolegend
|
||||||
|
|
||||||
we get 5 different curves with one point in each. The first column, as produced
|
we get 5 different curves with one point in each. The first column, as produced
|
||||||
by C<awk>, is B<2,4,6,8,10>. These are interpreted as the IDs of the curves to
|
by C<awk>, is B<2,4,6,8,10>. These are interpreted as the IDs of the curves to
|
||||||
@ -778,7 +778,7 @@ doing this: with a shebang (#!) or with inline perl data.
|
|||||||
A self-plotting, executable data file C<data> is formatted as
|
A self-plotting, executable data file C<data> is formatted as
|
||||||
|
|
||||||
$ cat data
|
$ cat data
|
||||||
#!/usr/bin/feedGnuplot --lines --points
|
#!/usr/bin/feedgnuplot --lines --points
|
||||||
2 1
|
2 1
|
||||||
4 4
|
4 4
|
||||||
6 9
|
6 9
|
||||||
@ -801,7 +801,7 @@ data file can be plotted simply with
|
|||||||
$ ./data
|
$ ./data
|
||||||
|
|
||||||
The caveats here are that on Linux the whole #! line is limited to 127 charaters
|
The caveats here are that on Linux the whole #! line is limited to 127 charaters
|
||||||
and that the full path to feedGnuplot must be given. The 127 character limit is
|
and that the full path to feedgnuplot must be given. The 127 character limit is
|
||||||
a serious limitation, but this can likely be resolved with a kernel patch. I
|
a serious limitation, but this can likely be resolved with a kernel patch. I
|
||||||
have only tried on Linux 2.6.
|
have only tried on Linux 2.6.
|
||||||
|
|
||||||
@ -815,7 +815,7 @@ create self-plotting files:
|
|||||||
use strict;
|
use strict;
|
||||||
use warnings;
|
use warnings;
|
||||||
|
|
||||||
open PLOT, "| feedGnuplot --lines --points" or die "Couldn't open plotting pipe";
|
open PLOT, "| feedgnuplot --lines --points" or die "Couldn't open plotting pipe";
|
||||||
while( <DATA> )
|
while( <DATA> )
|
||||||
{
|
{
|
||||||
my @xy = split;
|
my @xy = split;
|
||||||
@ -839,7 +839,7 @@ create self-plotting files:
|
|||||||
30 225
|
30 225
|
||||||
|
|
||||||
This is especially useful if the logged data is not in a format directly
|
This is especially useful if the logged data is not in a format directly
|
||||||
supported by feedGnuplot. Raw data can be stored after the __DATA__ directive,
|
supported by feedgnuplot. Raw data can be stored after the __DATA__ directive,
|
||||||
with a small perl script to manipulate the data into a useable format and send
|
with a small perl script to manipulate the data into a useable format and send
|
||||||
it to the plotter.
|
it to the plotter.
|
||||||
|
|
||||||
@ -957,7 +957,7 @@ As an example, if line 3 of the input is "0 9 1 20"
|
|||||||
How many extra values are given for each data point. Normally this
|
How many extra values are given for each data point. Normally this
|
||||||
is 0, and does not need to be specified, but sometimes we want
|
is 0, and does not need to be specified, but sometimes we want
|
||||||
extra data, like for colors or point sizes or error bars, etc.
|
extra data, like for colors or point sizes or error bars, etc.
|
||||||
feedGnuplot options that require this (colormap, circles)
|
feedgnuplot options that require this (colormap, circles)
|
||||||
automatically set it. This option is ONLY needed if unknown styles are
|
automatically set it. This option is ONLY needed if unknown styles are
|
||||||
used, with --curvestyleall for instance
|
used, with --curvestyleall for instance
|
||||||
|
|
2
debian/copyright
vendored
2
debian/copyright
vendored
@ -1,7 +1,7 @@
|
|||||||
Format-Specification: http://svn.debian.org/wsvn/dep/web/deps/dep5.mdwn?op=file&rev=135
|
Format-Specification: http://svn.debian.org/wsvn/dep/web/deps/dep5.mdwn?op=file&rev=135
|
||||||
Maintainer: Dima Kogan, <dima at secretsauce.net>
|
Maintainer: Dima Kogan, <dima at secretsauce.net>
|
||||||
Source: http://search.cpan.org/dist/feedGnuplot/
|
Source: http://search.cpan.org/dist/feedGnuplot/
|
||||||
Name: feedGnuplot
|
Name: feedgnuplot
|
||||||
|
|
||||||
Files: *
|
Files: *
|
||||||
Copyright: Dima Kogan, <dima at secretsauce.net>
|
Copyright: Dima Kogan, <dima at secretsauce.net>
|
||||||
|
2
debian/watch
vendored
2
debian/watch
vendored
@ -1,2 +1,2 @@
|
|||||||
version=3
|
version=3
|
||||||
http://search.cpan.org/dist/feedGnuplot/ .*/feedGnuplot-v?(\d[\d.-]+)\.(?:tar(?:\.gz|\.bz2)?|tgz|zip)$
|
http://search.cpan.org/dist/feedGnuplot/ .*/feedgnuplot-v?(\d[\d.-]+)\.(?:tar(?:\.gz|\.bz2)?|tgz|zip)$
|
||||||
|
@ -9,4 +9,4 @@ pm_to_blib*
|
|||||||
.lwpcookies
|
.lwpcookies
|
||||||
cover_db
|
cover_db
|
||||||
pod2htm*.tmp
|
pod2htm*.tmp
|
||||||
feedGnuplot-*
|
feedgnuplot-*
|
||||||
|
@ -12,5 +12,5 @@ BEGIN {
|
|||||||
use Test::More tests => 1;
|
use Test::More tests => 1;
|
||||||
use Test::Script::Run;
|
use Test::Script::Run;
|
||||||
|
|
||||||
run_ok( 'feedGnuplot', ['--help'], 'feedGnuplot can run');
|
run_ok( 'feedgnuplot', ['--help'], 'feedgnuplot can run');
|
||||||
|
|
||||||
|
Loading…
Reference in New Issue
Block a user