view release on metacpan or search on metacpan
t/patterns.txt view on Meta::CPAN
1|2|3|2|5|4|7|8|9|6|2|12:necessitated|
1|2|3|2|5|4|7|8|9|6|2|4:necessitates|
1|2|3|2|5|4|7|8|9|6|5|12|1:necessitation|
1|2|3|2|5|4|7|8|9|6|5|1|13:necessitating|
1|2|3|2|5|4|7|8|9|7|11:perennially|
1|2|3|2|5|6:Aegean|Aeneas|Aeneid|Bamako|Banach|Bogota|Calais|Duluth|Fijian|Geneva|Helena|Jeremy|Legers|Lilian|Loyola|Madame|Malawi|Mayans|Meyers|Miriam|Moloch|Navaho|Navajo|Peters|Pomona|Rafael|Selena|Seneca|Severn|Sicily|Sirius|Sonoma|Sonora|Staten|...
1|2|3|2|5|6|1:damaged|ensnare|ravager|savages|selects|sidings|sizings|statues|sutures|tiniest|
1|2|3|2|5|6|1|2|9|10:monogamous|
1|2|3|2|5|6|1|3:ensnares|
1|2|3|2|5|6|1|5|3|10:management|
1|2|3|2|5|6|1|5|3|10|11:managements|
t/patterns.txt view on Meta::CPAN
1|2|3|2|5|6|4|8|9:deceiving|receiving|unanimity|
1|2|3|2|5|6|4|8|9|10:honoraries|honorarium|vegetation|
1|2|3|2|5|6|4|8|9|2:repeatable|
1|2|3|2|5|6|4|8|9|3:vegetating|
1|2|3|2|5|6|5|8:mutually|parakeet|
1|2|3|2|5|6|7:Audubon|Augusta|Benelux|Beverly|Boeotia|Bologna|Burundi|Cologne|Dadaism|Dadaist|Dolores|Dorothy|Fijians|Genesco|Hoboken|Karachi|Lamarck|Laramie|Lazarus|Madames|Malamud|Natalie|Paramus|Potomac|Riviera|Saracen|Senegal|Statler|Stetson|Tehe...
1|2|3|2|5|6|7|1:herewith|monogram|receptor|rejector|salaries|savagers|stations|stitches|subunits|
1|2|3|2|5|6|7|1|2:redeclare|
1|2|3|2|5|6|7|1|2|10:redeclares|
1|2|3|2|5|6|7|1|2|3:redeclared|
1|2|3|2|5|6|7|1|9:genealogy|limitably|monograms|rejectors|unanimous|
t/patterns.txt view on Meta::CPAN
1|2|3|2|5|6|7|8|6|3|5|6|1:disinterested|
1|2|3|2|5|6|7|8|6|3|5|6|1|4|6|3|3:disinterestedness|
1|2|3|2|5|6|7|8|6|5|11:receptivity|selectivity|
1|2|3|2|5|6|7|8|6|5|4|5|13:uninterpreted|
1|2|3|2|5|6|7|8|6|7|11:determining|
1|2|3|2|5|6|7|8|9:Augustine|Colombian|Dirichlet|Dixieland|Japanized|Japanizes|Malayizes|Molochize|balancers|beheading|bereaving|cataloged|cataloger|celebrity|colonized|colonizer|colonizes|colorings|coroutine|deceasing|deceitful|deception|decertify|de...
1|2|3|2|5|6|7|8|9|1:monotheism|selections|
1|2|3|2|5|6|7|8|9|10:Colombians|Dixiecrats|Molochizes|benefactor|calamitous|ceremonial|colonizers|coroutines|cumulative|deceptions|defections|delegation|developing|federalist|federation|feverishly|filibuster|generalist|generality|generosity|generousl...
1|2|3|2|5|6|7|8|9|10|11:benefactors|celebrating|celebration|delegations|deservingly|determinacy|monographes|revelations|telegraphic|telescoping|vacationers|
1|2|3|2|5|6|7|8|9|10|11|12:celebrations|
1|2|3|2|5|6|7|8|9|10|11|2:determinable|renegotiable|
view all matches for this distribution
view release on metacpan or search on metacpan
sgf/redrose-tartrate.sgf view on Meta::CPAN
;B[ll]BL[1177.061]CR[ll]C[bass [1k\]: hmm?
]
;W[om]WL[1236.225]CR[om]C[Truc [-\]: lol
]
;B[kc]BL[1173.336]CR[kc]
;W[jc]WL[1234.000]CR[jc]C[peke [-\]: Black has to win, can't ruin the legend now. :/
]
;B[kb]BL[1170.401]CR[kb]C[phenomene [1d\]: both are unvainquished
EIKENHEIN [11k\]: yeah, not an even match
Heretix [24k\]: Anyone care to give a little bit of commentary, this game is confusing...
pyramids [6k\]: i like b
view all matches for this distribution
view release on metacpan or search on metacpan
lib/Games/Quake/Stats.pm view on Meta::CPAN
x_label => 'player',
y_label => 'frags',
title => 'manliness',
bar_spacing => 1,
bargroup_spacing => 10,
legend_spacing => 3,
legend_placement => 'RT',
show_values => 1,
y_max_value => $max_y + int($max_y/10),
#x_label_position => 0,
dclrs => [ ( "orange", "lgreen", "#0050FF", "dgreen", "#00BBBB",
"dblue", "dred", "blue", "dpurple", "lgray" ) ],
) or warn $my_graph->error;
$my_graph->set_legend(@player_names);
$my_graph->plot($data_ref) or croak $my_graph->error;
my $ext = $my_graph->export_format;
my $outfile;
open($outfile, ">$graph_file") or croak "Could not open $graph_file: $!\n";
binmode $outfile;
lib/Games/Quake/Stats.pm view on Meta::CPAN
x_label => 'player',
y_label => 'skill (% frags/fragged)',
title => 'skill',
bar_spacing => 1,
bargroup_spacing => 50,
legend_spacing => 5,
legend_placement => 'RT',
show_values => 1,
y_max_value => $max_y + int($max_y/10),
#x_label_position => 0,
dclrs => [ ( "#017797", "dpurple", "dred", "dgreen", "blue", "green",
"lblue", "dgray", "dgreen", "dblue", "marine" ) ],
) or warn $my_graph->error;
$my_graph->set_legend(@player_names);
$my_graph->plot($data_ref) or croak $my_graph->error;
my $ext = $my_graph->export_format;
my $outfile;
open($outfile, ">$skill_graph_file") or croak "Could not open $skill_graph_file: $!\n";
view all matches for this distribution
view release on metacpan or search on metacpan
# >read dusty book
# The first page of the book was the table of contents. Only two
# chapter names can be read: The Legend of the Unseen Terror and
# The Legend of the Great Implementers.
#
# >read legend of the implementers
# This legend, written in an ancient tongue, speaks of the
# creation of the world. A more absurd account can hardly be
# imagined. The universe, it seems, was created by "Implementers"
# who directed the running of great engines. These engines
# produced this world and others, strange and wondrous, as a test
# or puzzle for others of their kind. It goes on to state that
view all matches for this distribution
view release on metacpan or search on metacpan
lib/Games/Roshambo/Thrownames.pm view on Meta::CPAN
'75' => 'discards',
'57' => 'discards',
'61' => 'writes on',
'92' => 'has immortal',
'59' => 'discards',
'69' => 'legendary across',
'89' => 'in',
'91' => 'before',
'78' => 'before',
'79' => 'before',
'87' => 'defines',
view all matches for this distribution
view release on metacpan or search on metacpan
lib/Games/Word/Wordlist/Enable.pm view on Meta::CPAN
leftward leftwards leftwing lefty leg legacies legacy legal legalese legaleses
legalise legalised legalises legalising legalism legalisms legalist legalistic
legalistically legalists legalities legality legalization legalizations
legalize legalized legalizer legalizers legalizes legalizing legally legals
legate legated legatee legatees legates legateship legateships legatine
legating legation legations legato legator legators legatos legend legendarily
legendary legendries legendry legends leger legerdemain legerdemains
legerities legerity legers leges legged leggier leggiero leggiest leggin
legginess legginesses legging leggings leggins leggy leghorn leghorns
legibilities legibility legible legibly legion legionaries legionary
legionnaire legionnaires legions legislate legislated legislates legislating
legislation legislations legislative legislatively legislatives legislator
lib/Games/Word/Wordlist/Enable.pm view on Meta::CPAN
semidomestications semidominant semidry semidrying semidwarf semidwarfs
semidwarves semiempirical semierect semievergreen semifeudal semifinal
semifinalist semifinalists semifinals semifinished semifit semifitted
semiflexible semifluid semifluids semiformal semifunctional semigala semigloss
semigovernmental semigroup semigroups semihard semihigh semihobo semihoboes
semihobos semilegendary semilethal semilethals semiliquid semiliquids
semiliterate semiliterates semilog semilogarithmic semilunar semilustrous
semimat semimatt semimatte semimetal semimetallic semimetals semimicro
semimoist semimonastic semimonthlies semimonthly semimute semimystical semina
seminal seminally seminar seminarian seminarians seminaries seminarist
seminarists seminars seminary seminatural seminiferous seminomad seminomadic
view all matches for this distribution
view release on metacpan or search on metacpan
root/uaf_login.tt view on Meta::CPAN
[% title = view.title %]
<form method="post" action="/login" name="login">
<div id="login" class="login">
<fieldset>
<legend>Please Login</legend>
<div class="username">
<label for="username">Username:</label>
<input type="text" name="username" size="32" value="demo" id="username">
</div>
<div class="password">
view all matches for this distribution
view release on metacpan or search on metacpan
lib/Gantry/Control/C/Groups.pm view on Meta::CPAN
});
}
my $form = {
ajax_java_script => $ajax->define_javascript_functions,
legend => "Add/Remove Members",
back => $$self{location},
fields => \@fields
};
# stash form
lib/Gantry/Control/C/Groups.pm view on Meta::CPAN
my ( $self, $data ) = @_;
my $row = $data->{row};
my $form = {
legend => $self->path_info =~ /edit/i ? 'Edit' : 'Add',
row => $row,
fields => [
{ name => 'name',
label => 'Group Name',
type => 'text',
view all matches for this distribution
view release on metacpan or search on metacpan
Genetics/API/Analysis.pm view on Meta::CPAN
bar_spacing => 3,
# shadow_depth => 2,
# shadowclr => 'black',
transparent => 0,
) or carp "WARNING [graphAlleleFreqs]: " . $graph->error ;
$graph->set_legend( @sourceNames );
$graph->plot( \@data ) or croak "ERROR [graphAlleleFreqs]: " . $graph->error ;
$fileName = "/tmp/$$.png" ;
&_saveGraphToFile($graph, $fileName) ;
system("xv $fileName &") == 0 or
croak "ERROR [graphAlleleFreqs]: system xv $fileName & failed: $?" ;
view all matches for this distribution
view release on metacpan or search on metacpan
lib/Genome/Model/Tools/Music/Survival.pm view on Meta::CPAN
},
phenotypes_to_include => {
is => 'Text', is_optional => 1,
doc => "Include only these genes and/or phenotypes in the anlaysis. (COMMA-DELIMITED)",
},
legend_placement => {
is => 'Text', is_optional => 1, default => 'bottomleft',
doc => "Choose one of 'bottomleft', 'topleft', 'topright', or 'bottomright'.",
},
skip_non_coding => {
is => 'Boolean', is_optional => 1, default => 1,
lib/Genome/Model/Tools/Music/Survival.pm view on Meta::CPAN
# parse input arguments
my $self = shift;
my $bam_list = $self->bam_list;
my $genetic_data_type = $self->genetic_data_type;
my $legend_placement = $self->legend_placement;
# handle phenotype inclusions
my @phenotypes_to_include;
my @clinical_phenotypes_to_include;
my @mutated_genes_to_include;
lib/Genome/Model/Tools/Music/Survival.pm view on Meta::CPAN
return;
}
}
# set up R command
my $R_cmd = "R --slave --args < " . __FILE__ . ".R " . join( " ", $survival_data_file, $mutation_matrix, $legend_placement, $output_dir );
print "R_cmd:\n$R_cmd\n";
#run R command
WIFEXITED( system $R_cmd ) or croak "Couldn't run: $R_cmd ($?)";
view all matches for this distribution
view release on metacpan or search on metacpan
t/sandbox/usr/portage/net-dns/djbdns/djbdns-1.05-r10.ebuild view on Meta::CPAN
DESCRIPTION="Excellent high-performance DNS services"
HOMEPAGE="http://cr.yp.to/djbdns.html"
SRC_URI="http://cr.yp.to/djbdns/${P}.tar.gz
fwdzone? ( http://www.skarnet.org/software/djbdns-fwdzone/djbdns-1.04-fwdzone.patch )
roundrobin? ( http://www.legend.co.uk/djb/dns/round-robin.patch )
ipv6? ( http://www.fefe.de/dns/djbdns-1.05-test20.diff.bz2 )"
SLOT="0"
LICENSE="as-is"
KEYWORDS="~x86"
view all matches for this distribution
view release on metacpan or search on metacpan
t/sample.gpx view on Meta::CPAN
B. Our second stop on our little journey is on the East Side of the county.<br><br>
N 39° 01.468<br>
W087° 58.279<br><br>
It's the Mound Cemetery where music legend Burl Ives is buried. <A HREF="http://eiuhalloffame.tripod.com/burlives/ivesmonument.html">Link here</a><br><br>
Please stop and read his Monument. It's very nicely done.<br>
My Grandparents are also here on the east side.<br>
Today we come to visit âSarah C. Whiteâ She was<br>
Born in 18BB and Died in 1928<br><br>
view all matches for this distribution
view release on metacpan or search on metacpan
lib/Geo/Coordinates/OSGB/Grid.pm view on Meta::CPAN
($sq, $e, $n) = format_grid(438710.908, 114792.248); # ('SU', 387, 147)
Note that rather than being rounded, the easting and northing are
B<truncated> to hectometres (as the OS system demands), so the grid
reference refers to the lower left corner of the relevant 100m square.
The system is described below the legend on all OS Landranger maps.
The format grid routine takes an optional third argument to control the
form of grid reference returned. This should be a hash reference with
one or more of the keys shown below (with the default values).
view all matches for this distribution
view release on metacpan or search on metacpan
# The default value is: NO.
# This tag requires that the tag HAVE_DOT is set to YES.
DOT_MULTI_TARGETS = NO
# If the GENERATE_LEGEND tag is set to YES doxygen will generate a legend page
# explaining the meaning of the various boxes and arrows in the dot generated
# graphs.
# The default value is: YES.
# This tag requires that the tag HAVE_DOT is set to YES.
view all matches for this distribution
view release on metacpan or search on metacpan
lib/Geo/ISO19139/xsd/2005/gmd/identification.xsd view on Meta::CPAN
<xs:attribute ref="gco:nilReason"/>
</xs:complexType>
<!-- =========================================================================== -->
<xs:complexType name="MD_BrowseGraphic_Type">
<xs:annotation>
<xs:documentation>Graphic that provides an illustration of the dataset (should include a legend for the graphic)</xs:documentation>
</xs:annotation>
<xs:complexContent>
<xs:extension base="gco:AbstractObject_Type">
<xs:sequence>
<xs:element name="fileName" type="gco:CharacterString_PropertyType"/>
view all matches for this distribution
view release on metacpan or search on metacpan
root/static/js/jquery.min.js view on Meta::CPAN
{},i;if(f&&a.length){e=0;for(var o=a.length;e<o;e++){i=a[e];j[i]||(j[i]=c.expr.match.POS.test(i)?c(i,b||this.context):i)}for(;f&&f.ownerDocument&&f!==b;){for(i in j){e=j[i];if(e.jquery?e.index(f)>-1:c(f).is(e)){d.push({selector:i,elem:f});delete j[i]...
"string")return c.inArray(this[0],a?c(a):this.parent().children());return c.inArray(a.jquery?a[0]:a,this)},add:function(a,b){a=typeof a==="string"?c(a,b||this.context):c.makeArray(a);b=c.merge(this.get(),a);return this.pushStack(qa(a[0])||qa(b[0])?b:...
d)},next:function(a){return c.nth(a,2,"nextSibling")},prev:function(a){return c.nth(a,2,"previousSibling")},nextAll:function(a){return c.dir(a,"nextSibling")},prevAll:function(a){return c.dir(a,"previousSibling")},nextUntil:function(a,b,d){return c.d...
a.contentDocument||a.contentWindow.document:c.makeArray(a.childNodes)}},function(a,b){c.fn[a]=function(d,f){var e=c.map(this,b,d);eb.test(a)||(f=d);if(f&&typeof f==="string")e=c.filter(f,e);e=this.length>1?c.unique(e):e;if((this.length>1||gb.test(f))...
1&&f.push(a);a=a[b]}return f},nth:function(a,b,d){b=b||1;for(var f=0;a;a=a[d])if(a.nodeType===1&&++f===b)break;return a},sibling:function(a,b){for(var d=[];a;a=a.nextSibling)a.nodeType===1&&a!==b&&d.push(a);return d}});var Ja=/ jQuery\d+="(?:\d+|null...
a:b+"></"+d+">"},F={option:[1,"<select multiple='multiple'>","</select>"],legend:[1,"<fieldset>","</fieldset>"],thead:[1,"<table>","</table>"],tr:[2,"<table><tbody>","</tbody></table>"],td:[3,"<table><tbody><tr>","</tr></tbody></table>"],col:[2,"<tab...
c(this);d.text(a.call(this,b,d.text()))});if(typeof a!=="object"&&a!==w)return this.empty().append((this[0]&&this[0].ownerDocument||s).createTextNode(a));return c.text(this)},wrapAll:function(a){if(c.isFunction(a))return this.each(function(d){c(this)...
wrapInner:function(a){if(c.isFunction(a))return this.each(function(b){c(this).wrapInner(a.call(this,b))});return this.each(function(){var b=c(this),d=b.contents();d.length?d.wrapAll(a):b.append(a)})},wrap:function(a){return this.each(function(){c(thi...
prepend:function(){return this.domManip(arguments,true,function(a){this.nodeType===1&&this.insertBefore(a,this.firstChild)})},before:function(){if(this[0]&&this[0].parentNode)return this.domManip(arguments,false,function(b){this.parentNode.insertBefo...
this.nextSibling)});else if(arguments.length){var a=this.pushStack(this,"after",arguments);a.push.apply(a,c(arguments[0]).toArray());return a}},remove:function(a,b){for(var d=0,f;(f=this[d])!=null;d++)if(!a||c.filter(a,[f]).length){if(!b&&f.nodeType=...
return this},clone:function(a){var b=this.map(function(){if(!c.support.noCloneEvent&&!c.isXMLDoc(this)){var d=this.outerHTML,f=this.ownerDocument;if(!d){d=f.createElement("div");d.appendChild(this.cloneNode(true));d=d.innerHTML}return c.clean([d.repl...
view all matches for this distribution
view release on metacpan or search on metacpan
lib/Google/Chart.pm view on Meta::CPAN
color => {
is => 'rw',
isa => 'Google::Chart::Color',
coerce => 1,
},
legend => {
is => 'rw',
does => 'Google::Chart::Legend',
coerce => 1,
},
grid => {
lib/Google/Chart.pm view on Meta::CPAN
=item axis
Specifies the axis labels and such that go on line and bar charts
=item legend
=item color
=item fill
view all matches for this distribution
view release on metacpan or search on metacpan
ajax/jquery.min.js view on Meta::CPAN
/*! jQuery v1.9.0 | (c) 2005, 2012 jQuery Foundation, Inc. | jquery.org/license */(function(e,t){"use strict";function n(e){var t=e.length,n=st.type(e);return st.isWindow(e)?!1:1===e.nodeType&&t?!0:"array"===n||"function"!==n&&(0===t||"number"==typeo...
},set:function(e,n,r){return st.nodeName(e,"input")?(e.defaultValue=n,t):Ct&&Ct.set(e,n,r)}}),Ht||(Ct=st.valHooks.button={get:function(e,n){var r=e.getAttributeNode(n);return r&&("id"===n||"name"===n||"coords"===n?""!==r.value:r.specified)?r.value:t}...
},nextAll:function(e){return st.dir(e,"nextSibling")},prevAll:function(e){return st.dir(e,"previousSibling")},nextUntil:function(e,t,n){return st.dir(e,"nextSibling",n)},prevUntil:function(e,t,n){return st.dir(e,"previousSibling",n)},siblings:functio...
//@ sourceMappingURL=jquery.min.map
view all matches for this distribution
view release on metacpan or search on metacpan
doc/manual/syntax.html view on Meta::CPAN
<p>
You can also set an attribute for all parts, or only for specific parts:
</p>
<ul>
<li><code>[ A|B ] { class: |legend; }</code>
will put B into class 'legend' and leave the class of A alone
<li><code>[ A|B ] { class: legend|; }</code>
will put A into class 'legend' and leave the class of B alone
<li><code>[ A|B ] { class: legend; }</code>
will put A <b>and</b> B into class 'legend'
</ul>
<p>
Here are the rules from above in an example showing their effect:
</p>
view all matches for this distribution
view release on metacpan or search on metacpan
+ "align" - alignment for graph, group, edge and node labels
* General:
+ fix Makefile.PL to work with newer YAML
+ avoid duplicate code when dealing with labels and dimensions
+ empty attribute-parts on autosplit nodes work now:
[ A|B ] { class: |legend; }
will put B into class 'legend' and leave the class of A alone
[ A|B ] { class: legend|; }
will put A into class 'legend' and leave the class of B alone
[ A|B ] { class: legend; }
will put A *and* B into class 'legend'
+ _class_styles(): use correct indent instead of hard-coded ' '
* Edge:
* start_port()/end_port(): + remove spaces to normalize result
+ return list in list context
* Node:
view all matches for this distribution
view release on metacpan or search on metacpan
lib/Graphics/GnuplotIF.pm view on Meta::CPAN
[4, 6, 12, 27],
[9, 15, 27, 54],
);
$plot3->gnuplot_cmd( "set grid" ); # send a gnuplot command
$plot3->gnuplot_set_plot_titles("surface"); # set legend
$plot3->gnuplot_plot_3d( \@xyz ); # start 3-D-plot
$plot3->gnuplot_pause( ); # hit RETURN to continue
=head1 DESCRIPTION
lib/Graphics/GnuplotIF.pm view on Meta::CPAN
title => '', # string
xlabel => 'x', # string
ylabel => 'y', # string
xrange => [], # array reference; autoscaling, if empty
xrange => [], # array reference; autoscaling, if empty
plot_titles => [], # array of strings; titles used in the legend
scriptfile => '', # write all plot commands to the specified file
plot_also => 0, # write all plot commands to the specified file,
# in addition show the plots
persist => 0, # let plot windows survive after gnuplot exits
# 0 : close / 1 : survive
view all matches for this distribution
view release on metacpan or search on metacpan
lib/Graphics/HotMap.pm view on Meta::CPAN
);
# Define scale
$hotMap->scale(20);
# Show legend
$hotMap->legend(1);
# Show CrossMarks and values
$hotMap->crossMark(1,1);
# Define a new size
lib/Graphics/HotMap.pm view on Meta::CPAN
=for usage
Graphics::HotMap->new(
outfileGif => <File path>, # file to write GIF
outfilePng => <File path>, # file to write PNG
legend => [0|1], # activate lengend
legendNbGrad => <number>, # Number a graduation
cross => <bool>, # activate crossing of known values
crossValues => <bool>, # activate values printing whith cross
minValue => <number>, # minimum value
maxValue => <number>, # maximum value
font => <path to font file>,
lib/Graphics/HotMap.pm view on Meta::CPAN
sub new {
my ($class, %params) = (@_);
my $self={};
$self->{_outfileGif} = $params{outfileGif} || undef;
$self->{_outfilePng} = $params{outfilePng} || undef;
$self->{_legend} = $params{legend} || 0;
$self->{_legendNbGrad} = $params{legendNbGrad} || 7;
$self->{_crossMark} = $params{cross} || 0;
$self->{_crossMarkTemp}= $params{crossTemp} || 0;
#$self->{_minValue} = $params{minValue} || 0;
#$self->{_maxValue} = $params{maxValue} || 70;
$self->{_font} = $params{font} || '/usr/share/fonts/truetype/freefont/FreeSans.ttf';
lib/Graphics/HotMap.pm view on Meta::CPAN
die "toString: Unknown Function. => '$function'",$/;
}
return scalar ($tmpPiddle);
}
=item legend()
=for ref
Set or Return legend status. When enabled, the legend gradient will be drawn on the image.
=cut
sub legend {
my $self = shift;
my ($value) = @_;
if (defined $value) {
$self->{_legend} = 1;
} else {
return $self->{_legend};
}
}
=item crossMark()
lib/Graphics/HotMap.pm view on Meta::CPAN
rotate=>$rotate,
);
}
=for comment
Internal function for generating legend bar on the image
=cut
sub _drawLegendBar {
my $self = shift;
my ($gradientName, $i, $im) = @_;
my $repere = 10;
my $legendBar = Graphics::HotMap->new(
wall => 1,
);
$legendBar->{_gradient} = $self->{_gradient};
$legendBar->mapSize({
sizeX => 10,
sizeY => 500,
});
$legendBar->addLayer({ layerName => '_Legend'.$gradientName, visibility => 1, gradientName => $gradientName });
my $nbGrad = $self->{_gradient}{$gradientName}{nbColors}; #$self->{_legendNbGrad}-1;
my $min = $self->{_gradient}{$gradientName}{minValue};
my $max = $self->{_gradient}{$gradientName}{maxValue};
for (0..$nbGrad) {
my $x = $legendBar->{_mapSize}{x}-1;
my $y = $_/$nbGrad*($legendBar->{_mapSize}{y}-1);
my $valeur = $max-(int(($nbGrad-$_)/$nbGrad*($max-$min)));
my $unit = $legendBar->{_gradient}{$gradientName}{unit};
$legendBar->addPoint({
layerName => '_Legend'.$gradientName,
#x => $_/$nbGrad*($legendBar->{_mapSize}{x}-1),
#y => $legendBar->{_mapSize}{y}-1-$repere*$i,
x => $x,
y => $y,
value => $valeur,
noScale => 1,
unit => $unit,
});
$legendBar->addText ( {
x => $x+15,
y => $y+10,
text => int($valeur).$unit,
size => 10,
align => 'center'
} ) if ($nbGrad < 11 || $_%5 == 0);
}
$legendBar->addZone({
layerName =>'_Legend'.$gradientName,
zoneName => '_Legend'.$gradientName,
coordonates => [
1,
1,
$legendBar->{_mapSize}{x}-1,
$legendBar->{_mapSize}{y}-1,
],
noScale => 1 });
$legendBar->_genDegradZone('_Legend'.$gradientName, $legendBar->{_zones}{'_Legend'.$gradientName}{'_Legend'.$gradientName}, 1);
my $imag = byte $legendBar->{_mapPoints};
my $tmpName = new File::Temp( TEMPLATE => 'generated-XXXXX',
DIR => '/tmp/',
SUFFIX => '.png',
OPEN => 0);
#my $tmpName = tmpnam().'.png';
my $cptLoop = 0;
do {
eval {$imag->wpic($tmpName, { LUT => $legendBar->{_gradient}{colors} }); };
# $imag->wpic($tmpName, { LUT => $legendBar->{_gradient}{colors} });
++$cptLoop;
} while ($@ && $cptLoop < 10);
if ($cptLoop > 2) {
print "ARgh ! Function: _saveImage ; nbErr for wpic:$cptLoop\n";
lib/Graphics/HotMap.pm view on Meta::CPAN
# Flip the image
$im->[$i+1]->Flip;
$im->[$i+1]->Border(fill=>'black', width=>-1, height=>-1);
$im->[$i+1]->Extent(
background => 'white',
geometry => ($legendBar->{_mapSize}{x}+35).'x'.($legendBar->{_mapSize}{y}+15),
gravity => 'West',
);
$legendBar->_genText($im->[$i+1]);
$im->[$i+1]->Extent(
background => 'white',
geometry => ($legendBar->{_mapSize}{x}+35).'x'.$self->{_mapSize}{y},
gravity => 'Center',
);
$im->[$i+1]->Extent(
background => 'white',
geometry => ($legendBar->{_mapSize}{x}+35+20).'x'.$self->{_mapSize}{y},
gravity => 'East',
);
$im->[$i+1]->Annotate(
font=>$self->{_font},
pointsize=>10,
lib/Graphics/HotMap.pm view on Meta::CPAN
);
$self->{_im} = $im->Append(stack=>'false');
}
=for comment
Internal function for generating legend on the image
=cut
sub _genLegende {
my $self = shift;
lib/Graphics/HotMap.pm view on Meta::CPAN
# Draw time on image
$self->_drawTime($im) if $self->{_horodatage}[0];
# Draw texts
$self->_genText($im);
# Gen legend in piddle
$self->_genLegende($im) if $self->{_legend};
}
=for comment
Really compute the interpolation from known points.
view all matches for this distribution
view release on metacpan or search on metacpan
my $colbox = 1;
my $collab = 3;
my @colline = (2,3,4,5); # pens color
my @styline = @colline; # linestyle
# Pen legends
my @legline = (qw/ sum sin sin*noi sin+noi /);
# legend position
my $xlab = 0;
my $ylab = 0.25;
my $autoy = 1; # autoscale y
my $acc = 1; # don't scrip, accumulate
view all matches for this distribution
view release on metacpan or search on metacpan
docs/assets/stylesheets/bootstrap/_forms.scss view on Meta::CPAN
// so we reset that to ensure it behaves more like a standard block element.
// See https://github.com/twbs/bootstrap/issues/12359.
min-width: 0;
}
legend {
display: block;
width: 100%;
padding: 0;
margin-bottom: $line-height-computed;
font-size: ($font-size-base * 1.5);
line-height: inherit;
color: $legend-color;
border: 0;
border-bottom: 1px solid $legend-border-color;
}
label {
display: inline-block;
max-width: 100%; // Force IE8 to wrap long content (see https://github.com/twbs/bootstrap/issues/13141)
docs/assets/stylesheets/bootstrap/_forms.scss view on Meta::CPAN
// Placeholder
@include placeholder;
// Disabled and read-only inputs
//
// HTML5 says that controls under a fieldset > legend:first-child won't be
// disabled if the fieldset is disabled. Due to implementation difficulty, we
// don't honor that edge case; we style them as disabled anyway.
&[disabled],
&[readonly],
fieldset[disabled] & {
view all matches for this distribution
view release on metacpan or search on metacpan
lib/GrowthForecast/RRD.pm view on Meta::CPAN
'--border', $args->{border},
);
push @opt, '-y', $args->{ygrid} if $args->{ygrid};
push @opt, '-t', "$period_title" if !$args->{notitle};
push @opt, '--no-legend' if !$args->{legend};
push @opt, '--only-graph' if $args->{graphonly};
push @opt, '--logarithmic' if $args->{logarithmic};
push @opt, '--font', "AXIS:8:";
push @opt, '--font', "LEGEND:8:";
push @opt, '-u', $args->{upper_limit} if defined $args->{upper_limit};
lib/GrowthForecast/RRD.pm view on Meta::CPAN
}
push @opt, join(":",
'VRULE',
join("", $vrule->{time}, $vrule->{color}),
($args->{vrule_legend} ? $desc : ""),
($vrule->{dashes} ? 'dashes='.$vrule->{dashes} : ()),
);
}
push @opt, 'COMMENT:\n';
view all matches for this distribution
view release on metacpan or search on metacpan
lib/Gtk2/Ex/Geo/Dialogs/Colors.pm view on Meta::CPAN
my($dialog, $boot) = $self->bootstrap_dialog
($gui, 'colors_dialog', "Colors for ".$self->name,
{
colors_dialog => [delete_event => \&cancel_colors, [$self, $gui]],
color_scale_button => [clicked => \&fill_color_scale_fields, [$self, $gui]],
color_legend_button => [clicked => \&make_color_legend, [$self, $gui]],
copy_colors_button => [clicked => \©_colors, [$self, $gui]],
open_colors_button => [clicked => \&open_colors_file, [$self, $gui]],
save_colors_button => [clicked => \&save_colors_file, [$self, $gui]],
lib/Gtk2/Ex/Geo/Dialogs/Colors.pm view on Meta::CPAN
my $tv = $dialog->get_widget('colors_treeview');
for my $w (qw/color_field_label color_field_combobox
scale_label2 scale_min_entry scale_label3 scale_max_entry color_scale_button
color_legend_button
rainbow_label
min_hue_label min_hue_button max_hue_label max_hue_button hue_range_combobox
grayscale_label4 grayscale_color_label grayscale_color_button grayscale_adjust_combobox
grayscale_label5 grayscale_invert_checkbutton
border_color_checkbutton border_color_label border_color_button
lib/Gtk2/Ex/Geo/Dialogs/Colors.pm view on Meta::CPAN
$dialog->get_widget($w)->set_sensitive(1);
}
$tv->set_sensitive(1);
} elsif ($palette eq 'Grayscale' or $palette eq 'Rainbow' or $palette =~ 'channel') {
for my $w (qw/scale_label2 scale_min_entry scale_label3 scale_max_entry color_scale_button
color_legend_button/) {
$dialog->get_widget($w)->set_sensitive(1);
}
$tv->set_sensitive(1);
} elsif ($palette eq 'Color table') {
for my $w (qw/manage_label copy_colors_button open_colors_button save_colors_button
lib/Gtk2/Ex/Geo/Dialogs/Colors.pm view on Meta::CPAN
$self->{colors_dialog}->get_widget('scale_min_entry')->set_text($range[0]) if defined $range[0];
$self->{colors_dialog}->get_widget('scale_max_entry')->set_text($range[1]) if defined $range[1];
}
##@ignore
sub make_color_legend {
my($self, $gui) = @{$_[1]};
put_scale_in_treeview($self);
}
# color treeview subs
view all matches for this distribution
view release on metacpan or search on metacpan
examples/graph-gd-demo.pl view on Meta::CPAN
transparent => 0,
# cumulate => TRUE,
type => ['lisen', 'bars', 'bars'],
);
my @legend_keys = ('Field Mice Population', 'Fish Population', 'Lobster Growth in millions');
$graph->set_legend(@legend_keys);
my $data = GD::Graph::Data->new([
[ 2000, 2001, 2002, 2003, 2004, 2005, 2006, 2007, 2008,],
[ 1, 2, 5, 8, 3, 4.5, 1, 3, 4],
[1.4, 4, 15, 6, 13, 1.5, 11, 3, 4],
view all matches for this distribution
view release on metacpan or search on metacpan
t/10-tagset.t view on Meta::CPAN
<isindex action="value"></isindex>
<isindex></isindex>
<kbd></kbd>
<label></label>
<layer background="value" src="value"></layer>
<legend></legend>
<li />
<li></li>
<link />
<link href="value"></link>
<link></link>
view all matches for this distribution
view release on metacpan or search on metacpan
lib/HTML/Builder.pm view on Meta::CPAN
base bdo big blockquote body br
button caption cite code col colgroup
dd del dfn div dl dt
em fieldset form frame frameset h1
head hr html i iframe img
input ins kbd label legend li
link meta noframes noscript object
ol optgroup option p param pre
samp script select small span
strong style sup table
tbody td textarea tfoot th thead
view all matches for this distribution
view release on metacpan or search on metacpan
Extractor.xs view on Meta::CPAN
skip_tags[6] = get_tag_id(my_r->tags, "bgsound");
skip_tags[7] = get_tag_id(my_r->tags, "canvas");
skip_tags[8] = get_tag_id(my_r->tags, "datalist");
skip_tags[9] = get_tag_id(my_r->tags, "button");
skip_tags[10] = get_tag_id(my_r->tags, "fieldset");
skip_tags[11] = get_tag_id(my_r->tags, "legend");
skip_tags[12] = get_tag_id(my_r->tags, "input");
skip_tags[13] = get_tag_id(my_r->tags, "keygen");
skip_tags[14] = get_tag_id(my_r->tags, "textarea");
skip_tags[15] = get_tag_id(my_r->tags, "frameset");
skip_tags[16] = get_tag_id(my_r->tags, "noframes");
Extractor.xs view on Meta::CPAN
add_tag_R(tags, "form", 4, 0, 0, TYPE_TAG_BLOCK, 0, OPTION_NULL, AI_NULL);
add_tag_R(tags, "button", 6, 0, 0, TYPE_TAG_NORMAL, 0, OPTION_NULL, AI_NULL);
// ++ form: fieldset ++
add_tag_R(tags, "fieldset", 8, 0, 0, TYPE_TAG_BLOCK, 0, OPTION_NULL, AI_NULL);
add_tag_R(tags, "legend", 6, 0, 0, TYPE_TAG_NORMAL, 0, OPTION_NULL, AI_NULL);
// -- form: fieldset --
// ++ form: select ++
add_tag_R(tags, "select", 6, 20, FAMILY_SELECT, TYPE_TAG_NORMAL, EXTRA_TAG_CLOSE_PRIORITY, OPTION_CLEAN_TAGS, AI_NULL);
add_tag_R(tags, "optgroup", 8, 19, FAMILY_SELECT, TYPE_TAG_NORMAL, EXTRA_TAG_CLOSE_PRIORITY, OPTION_CLEAN_TAGS_SAVE, AI_NULL);
view all matches for this distribution