Result:
found more than 557 distributions - search limited to the first 2001 files matching your query
( run in 2.337 )
HTML-EditableTable
view release on metacpan or search on metacpan
lib/HTML/EditableTable.pm view on Meta::CPAN
'uniquifierField' => 'part_id',
},
{
'dbfield' => 'vendor',
'label' => 'Vendor',
'formElement' => 'popup',
'selectionList' => ['', 'Amexx', 'Armscor', 'Consolidated', 'Gentine', 'Oroco', 'Praxis', 'Shellalco', 'Subarashii',],
'uniquifierField' => 'part_id',
},
{
'dbfield' => 'description',
lib/HTML/EditableTable.pm view on Meta::CPAN
'uniquifierField' => 'part_id',
},
{
'dbfield' => 'rohs_category',
'label' => 'RoHS',
'formElement' => 'popup',
'selectionList' => ['',1..10],
'selectionLabels' => {
1 => 'Large and small household appliances',
2 => 'IT equipment',
3 => 'Telecommunications equipment',
lib/HTML/EditableTable.pm view on Meta::CPAN
'uniquifierField' => 'part_id',
},
{
'dbfield' => 'reorder_class',
'label' => 'Reorder Class',
'formElement' => 'popup',
'selectionList' => ['', 'A', 'B', 'C'],
'uniquifierField' => 'part_id',
},
{
'dbfield' => 'last_order_date',
lib/HTML/EditableTable.pm view on Meta::CPAN
}
elsif ($formElm eq 'textarea') {
print "<textarea rows=3 cols=60 name='$name' id='$id'></textarea>";
}
elsif ($formElm eq 'popup') {
if (exists $colSpec->{'selectionLabels'}) {
print popup_menu(-id=>$name, -name=>$name, -id=>$id, -values=>$colSpec->{'selectionList'}, -labels=>$colSpec->{'selectionLabels'}, -override=>1);
}
else {
print popup_menu(-id=>$name, -name=>$name, -id=>$id, -values=>$colSpec->{'selectionList'}, -override=>1);
}
}
elsif ($formElm eq 'scrollingList') {
my $selectionCount = scalar(@{$colSpec->{'selectionList'}});
lib/HTML/EditableTable.pm view on Meta::CPAN
if (exists $colSpec->{'masterCounterUniquify'}) {
$name .= '_' . $self->{'masterCounter'}++;
}
if ($colSpec->{'formElement'} eq 'popup') {
# we typically use a negative id for new data - sometimes we need to prevent edits on existing rows
my $disabled = undef;
lib/HTML/EditableTable.pm view on Meta::CPAN
}
if (exists $colSpec->{'selectionListCallback'}) {
my $fp = $colSpec->{'selectionListCallback'};
my $selectionList = &$fp($row);
print "<td $tdFormat>" . popup_menu(-tabindex=>$tabindex, -id=>$name, -name=>$name, -values=>$selectionList, -default=>$cellValue, -override=>1) . "</td>";
}
elsif (exists $colSpec->{'selectionLabels'}) {
print "<td $tdFormat>";
# new version of firefox maybe? - undef disabled flag now results in disabled field??
if ($disabled) {
print popup_menu(-tabindex=>$tabindex, -disabled=>$disabled, -id=>$name, -name=>$name, -values=>$colSpec->{'selectionList'}, -labels=>$colSpec->{'selectionLabels'}, -default=>$cellValue, -override=>1);
}
else {
print popup_menu(-tabindex=>$tabindex, -id=>$name, -name=>$name, -values=>$colSpec->{'selectionList'}, -labels=>$colSpec->{'selectionLabels'}, -default=>$cellValue, -override=>1);
}
# disabled field will not submit
if ($disabled) {
print "<input type=hidden name=\"$name\" value=\"$cellValue\">";
}
print "</td>";
}
else {
print "<td $tdFormat>" . popup_menu(-tabindex=>$tabindex, -id=>$name, -name=>$name, -values=>$colSpec->{'selectionList'}, -default=>$cellValue, -override=>1) . "</td>";
}
}
elsif ($colSpec->{'formElement'} eq 'scrollingList') {
my $selectionCount = scalar(@{$colSpec->{'selectionList'}});
lib/HTML/EditableTable.pm view on Meta::CPAN
print "<td $tdFormat>" . $html . "</td>";
}
else {
my $name;
# if we have a list and labels for a popup, assume the provided value is an index to the label;
if (exists $colSpec->{'selectionList'} && exists $colSpec->{'selectionLabels'}) {
print "<td $tdFormat>" . $colSpec->{'selectionLabels'}->{$cellValue} . "</td>";
}
lib/HTML/EditableTable.pm view on Meta::CPAN
=over
=item *
calendar - Implements popup calendar using www.dynarch.com jscalendar 1.0. Requires this javascript library to be accessible. See L</"JAVASCRIPT INTEGRATION"> for details.
=item *
checkbox - Implements checkbox html element
lib/HTML/EditableTable.pm view on Meta::CPAN
hidden - Implements hidden element type.
=item *
popup - implements CGI "poup"
=item *
scrollingList - implments CGI "scrolling_list"
lib/HTML/EditableTable.pm view on Meta::CPAN
'formElement' => 'checkbox'
=head2 selectionList (frequent)
An array reference to a list of values to display in a popup or scrollingList
'selectionList' => [ '34GXT', '35TTG', '56YUG' ]
=head2 selectionLabels (frequent)
A hash reference to labels and values to present in a popup or scrollingList. The keys are displayed while the values are provided in the form.
'selectionLabels' => { '34GXT' => 'Big Widget', '35TTG' => 'Medium Widget', '56YUG' => 'Small Widget' }
=head2 editOnly (frequent)
lib/HTML/EditableTable.pm view on Meta::CPAN
'editOnlyOnNegativeValue' => 1,
=head2 selectionListCallback (rare)
Specifies a callback to produce a value list for a popup or scrollingList element. Useful when a dynamic query or calculation must be made.
'selectionListCallback' => &getListValues
The interface for this call back is as follows:
HTML-ExtractMain
view release on metacpan or search on metacpan
t/test_case_data/google_short_blog.html view on Meta::CPAN
</span>
</span>
<div class='clear'></div>
</div><div class='widget HTML' id='HTML2'>
<div class='widget-content'>
<form action="http://feedburner.google.com/fb/a/mailverify" style="border:1px solid #ccc;padding:3px;text-align:center;" target="popupwindow" method="post" onsubmit="window.open('http://feedburner.google.com/fb/a/mailverify?uri=blogspot/MKuf', 'popup...
</div>
<div class='clear'></div>
<span class='widget-item-control'>
<span class='item-control blog-admin'>
<a class='quickedit' href='http://www.blogger.com/rearrange?blogID=10861780&widgetType=HTML&widgetId=HTML2&action=editWidget' onclick='return _WidgetManager._PopupConfig(document.getElementById("HTML2"));' target='configHTML2' title='Edit'>
HTML-ExtractMeta
view release on metacpan or search on metacpan
t/html/seattletimes.html view on Meta::CPAN
</div>
<div id="ImageBox" class="ImageBox">
<div class="ImageDiv" id="image_2020485329">
<p><a class="popup_enlarge" href="http://seattletimes.com/ABPub/zoom/html/2020485329.html"><img src="/ABPub/2013/03/02/2020474237.jpg" width="296" height="383" alt="Justin Smoak is just one of several Mariners who have come out this spring hi...
<a class="popup_enlarge" href="http://seattletimes.com/ABPub/zoom/html/2020485329.html"><img src="/art/ui/1024/v_2011/icons/enlarge.gif" align="left" width="21" height="12" alt="Enlarge this photo" class="ui"></a><p class="credit">MARCIO JOSE...
<div class="clear"></div>
<p class="caption">Justin Smoak is just one of several Mariners who have come out this spring hitting the ball hard. </p>
</div>
t/html/seattletimes.html view on Meta::CPAN
<li class="col grid120">
<p class="label Photograph"><a href="http://seattletimes.com/html/trending/">Most Viewed Galleries</a></p>
<div class="trendingItem">
<div class="trendingItemImg">
<a class="popup_mediacenter" href="http://seattletimes.nwsource.com/html/photogalleries/sports2020467603/">
<img alt="High school basketball state championships | Day 2" src="http://images.nwsource.com/d.img/index2.php?size=i5&i=ABPub/2013/03/01/2020467625.jpg" />
</a>
</div>
<p class="text trendingItemCaption"><a class="popup_mediacenter" href="http://seattletimes.nwsource.com/html/photogalleries/sports2020467603/">High school basketball state championships | Day 2</a></p>
</div>
</li>
<li class="col grid120">
<p class="label Video"><a href="http://seattletimes.com/html/trending/">Most watched<br>videos</a></p>
<div class="trendingItemImg">
<a href="/flatpages/video/mediacenterbc3.html?bctid=2198528309001" class="popup_mediacenter" target="popup_mediacenter">
<div class="st_videoembed_playsm trendingPlayButton"></div>
<img src="http://brightcove.vo.llnwd.net/d21/unsecured/media/1509317113/1509317113_2198501608001_noel-thumb.jpg?pubId=1509317113" title="'Get him, boy! Get him, boy!' (Warning: graphic)" alt="'Get him, boy! Get him, boy!' (Warning: graphic)" />
</a>
</div>
<p class="text trendingItemCaption">
<a href="/flatpages/video/mediacenterbc3.html?bctid=2198528309001" class="popup_mediacenter" target="popup_mediacenter">
'Get him, boy! Get him, boy!' (Warning: graphic)
</a>
</p>
t/html/seattletimes.html view on Meta::CPAN
<a href="http://nwhomes.nwsource.com/realestate/search/?from=stnb">Homes</a> |
<a href="http://nwsource.kaango.com/?from=stnb">Classifieds</a> |
<a href="http://nwhomes.nwsource.com/realestate/search/advanced/for-rent?from=stnb ">Rentals</a> |
<a href="http://personals.nwsource.com/?from=stnb">Personals</a></p>
<p id="footer-bottom-p3">
<a href="http://www.seattletimescompany.com/notices/notice3.html?from=stnv4" class="footerpopup">Copyright ©<span class="js_date_year"></span></a>
<a href="http://www.seattletimescompany.com/?from=stnv4">The Seattle Times Company</a> |
<a href="http://www.seattletimescompany.com/advertise/?from=stnv4">Advertise with us</a> |
<a class="footerpopup" href="http://www.seattletimescompany.com/notices/notice2.html?from=stnv4">Privacy statement</a> |
<a class="footerpopup" href="http://www.seattletimescompany.com/notices/notice1.html?from=stnv4">Terms of service</a></p>
</div>
</div><!-- end footer -->
<!-- start omniture -->
<script language="JavaScript" type="text/javascript" src="http://marketplace.nwsource.com/shared/js/s_code.js?v=2.1"></script>
<script language="JavaScript" type="text/javascript" src="http://marketplace.nwsource.com/shared/js/omniHelper.js?v=2.1"></script>
HTML-FormFu
view release on metacpan or search on metacpan
lib/HTML/FormFu/Manual/Cookbook.pod view on Meta::CPAN
/* add an asterisk at the end of the label for required fields */
fieldset .constraint_required label:after {
content: '*'
}
=head2 Add a popup hint to a field
Most display a tooltip when a user hovers their mouse pointer over an HTML
element with a "title" tag.
Aural browsers may try to turn the content into speech.
You can take advantage of this behaviour to provide a hint to the user about
HTML-FormTemplate
view release on metacpan or search on metacpan
lib/HTML/FormTemplate.pm view on Meta::CPAN
name => 'words',
'values' => ['eenie', 'meenie', 'minie', 'moe'],
default => ['eenie', 'minie'],
}, {
visible_title => "What's your favorite colour?",
type => 'popup_menu',
name => 'color',
'values' => ['red', 'green', 'blue', 'chartreuse'],
}, {
type => 'submit',
},
lib/HTML/FormTemplate.pm view on Meta::CPAN
B<radio> - makes a standalone radio button
=item 0
B<popup_menu> - makes a popup menu, one item can be selected at once
=item 0
B<scrolling_list> - makes a scrolling list, multiple selections possible
lib/HTML/FormTemplate.pm view on Meta::CPAN
B<radio_group> - makes a group of related radio buttons
=item 0
B<popup_menu_group> - makes a group of related popup menus
=item 0
B<scrolling_list_group> - makes a group of related scrolling lists
lib/HTML/FormTemplate.pm view on Meta::CPAN
# First set the 6 simpler %FIELD_TYPES atributes:
# visible, editable, selectable, field group, multivalued, rendering method
{
foreach my $type (qw( reset submit hidden textfield password_field textarea
checkbox radio popup_menu scrolling_list )) {
$FIELD_TYPES{$type} = {
$TKEY_VISIBL => 1, # true with 9/10, not hidden
$TKEY_EDITAB => 1, # true with 7/10, not reset submit hidden
$TKEY_SELECT => 0, # true with 6/10, not check radio popup scroll
$TKEY_FLDGRP => 0, # true with 10/10
$TKEY_MULTIV => 0, # true with 8/10, not popup scroll
$TKEY_METHOD => '_make_input_html', # true with 7/10, n txa pop scr
};
$FIELD_TYPES{$type."_group"} = {
$TKEY_VISIBL => 1, # true with 9/10, not hidden
$TKEY_EDITAB => 1, # true with 7/10, not reset, submit, hidden
$TKEY_SELECT => 0, # true with 6/10, not check radio popup scroll
$TKEY_FLDGRP => 1, # true with 10/10
$TKEY_MULTIV => 1, # true with 10/10
$TKEY_METHOD => '_make_input_group_html', # true with 7/10, n ...
};
}
lib/HTML/FormTemplate.pm view on Meta::CPAN
}
foreach my $type (qw( reset submit hidden )) {
$FIELD_TYPES{$type}->{$TKEY_EDITAB} = 0;
$FIELD_TYPES{$type."_group"}->{$TKEY_EDITAB} = 0;
}
foreach my $type (qw( checkbox radio popup_menu scrolling_list )) {
$FIELD_TYPES{$type}->{$TKEY_SELECT} = 1;
$FIELD_TYPES{$type."_group"}->{$TKEY_SELECT} = 1;
}
foreach my $type (qw( popup_menu scrolling_list )) {
$FIELD_TYPES{$type}->{$TKEY_MULTIV} = 1;
}
foreach my $type (qw( textarea )) {
$FIELD_TYPES{$type}->{$TKEY_METHOD} = '_make_textarea_html';
$FIELD_TYPES{$type."_group"}->{$TKEY_METHOD} = '_make_textarea_group_html';
}
foreach my $type (qw( popup_menu scrolling_list )) {
$FIELD_TYPES{$type}->{$TKEY_METHOD} = '_make_select_html';
$FIELD_TYPES{$type."_group"}->{$TKEY_METHOD} = '_make_select_group_html';
}
}
lib/HTML/FormTemplate.pm view on Meta::CPAN
my $rem = $FKEY_DEFAULTS;
$FIELD_TYPES{$type}->{$TKEY_PARSER} = [$names, $rename, $rem];
$FIELD_TYPES{$type."_group"}->{$TKEY_PARSER} =
[$names_group, $rename, $rem];
}
foreach my $type (qw( checkbox radio popup_menu scrolling_list )) {
my $names = [ $FKEY_NAME, $FKEY_DEFAULTS, $FKEY_VALUES, $FKEY_LABELS ];
my $names_group = [ $FKEY_NAME, $FKEY_VALUES, $FKEY_DEFAULTS,
$FKEY_LINEBREAK, $FKEY_LABELS ];
my $rename = {
value => $FKEY_VALUES, checked => $FKEY_DEFAULTS,
lib/HTML/FormTemplate.pm view on Meta::CPAN
$FKEY_TABLE_COLS, $FKEY_TABLE_ROWS, $FKEY_TABLE_ACRF,
$FKEY_REQ_MIN_COUNT, $FKEY_REQ_MAX_COUNT );
}
$typerec->{$TKEY_ATTRIB} = \@attrib;
}
foreach my $type (qw( checkbox radio popup_menu scrolling_list )) {
my @attrib = ($FKEY_VALUES, $FKEY_LABELS);
push( @{$FIELD_TYPES{$type}->{$TKEY_ATTRIB}}, @attrib );
push( @{$FIELD_TYPES{$type."_group"}->{$TKEY_ATTRIB}}, @attrib );
}
foreach my $type (qw( checkbox radio )) {
lib/HTML/FormTemplate.pm view on Meta::CPAN
NOLABEL
This method makes a single radio option that has NAME for its name and
VALUE as its value. The arguments are the same as for a checkbox.
=head2 popup_menu( NAME, [DEFAULTS], VALUES[, LABELS] )
NAME
VALUES
[DEFAULTS or CHECKED or SELECTED or ON]
[LABELS or TEXT]
This method makes a single popup menu that has NAME for its name and option
values populated from the VALUES array ref argument. VALUES defaults to a
one-element list containing 'on' if not defined. If DEFAULTS is a hash ref
then its keys are matched with elements of VALUES and wherever its values are
true then the corresponding menu option is selected; otherwise, DEFAULTS is
taken as a list of option VALUES that are to be selected; by default, no
options are selected. Similarly, if LABELS is a hash ref then its keys are
matched with elements of VALUES and its values provide labels for them;
otherwise, LABELS is taken as a list of labels which are matched to VALUES
by their corresponding array indices. Since options must always have
user-visible labels, any one for which LABELS is undefined will default to
using its value as a label. Note that a popup menu is a simplified case of
a scrolling list where only one option can be selected and the selected option
is the only one visible while the field doesn't have the user's focus (the menu
visually opens up when the field has focus).
=head2 scrolling_list( NAME, [DEFAULTS], VALUES[, LABELS] )
lib/HTML/FormTemplate.pm view on Meta::CPAN
SIZE
MULTIPLE
This method makes a single scrolling list that has NAME for its name and option
values populated from the VALUES array ref argument. The arguments are the same
as for a popup menu, except that scrolling lists also support SIZE and MULTIPLE.
If MULTIPLE is true then the user can select multiple options; otherwise they
can select only one. If SIZE is a number greater than one then that number of
options is visually displayed at once; this argument defaults to the count of
elements in VALUES if false. Note that setting SIZE to 1 will cause this
field to be a popup menu instead.
=head2 reset_group( NAME[, DEFAULTS] )
NAME
[DEFAULTS or VALUES or LABELS]
lib/HTML/FormTemplate.pm view on Meta::CPAN
This method makes a group of related radio options, which have NAME in common.
There is one group member for each element in the array ref VALUES.
The arguments are the same as for a checkbox_group.
=head2 popup_menu_group( NAME, VALUES[, DEFAULTS[, LINEBREAK[, LABELS]]] )
NAME
VALUES
[DEFAULTS or CHECKED or SELECTED or ON]
[LABELS or TEXT]
This method makes a group of related popup menus, which have NAME in common.
There is one group member for each element in the array ref DEFAULTS.
=head2 scrolling_list_group( NAME, VALUES[, DEFAULTS[, LINEBREAK[, LABELS]]] )
NAME
lib/HTML/FormTemplate.pm view on Meta::CPAN
sub textfield { $_[0]->_proxy( 'textfield', \@_ ) }
sub password_field { $_[0]->_proxy( 'password_field', \@_ ) }
sub textarea { $_[0]->_proxy( 'textarea', \@_ ) }
sub checkbox { $_[0]->_proxy( 'checkbox', \@_ ) }
sub radio { $_[0]->_proxy( 'radio', \@_ ) }
sub popup_menu { $_[0]->_proxy( 'popup_menu', \@_ ) }
sub scrolling_list { $_[0]->_proxy( 'scrolling_list', \@_ ) }
sub reset_group { $_[0]->_proxy( 'reset_group', \@_ ) }
sub submit_group { $_[0]->_proxy( 'submit_group', \@_ ) }
sub hidden_group { $_[0]->_proxy( 'hidden_group', \@_ ) }
sub textfield_group { $_[0]->_proxy( 'textfield_group', \@_ ) }
sub password_field_group { $_[0]->_proxy( 'password_field_group', \@_ ) }
sub textarea_group { $_[0]->_proxy( 'textarea_group', \@_ ) }
sub checkbox_group { $_[0]->_proxy( 'checkbox_group', \@_ ) }
sub radio_group { $_[0]->_proxy( 'radio_group', \@_ ) }
sub popup_menu_group { $_[0]->_proxy( 'popup_menu_group', \@_ ) }
sub scrolling_list_group { $_[0]->_proxy( 'scrolling_list_group', \@_ ) }
######################################################################
=head1 METHODS FOR MAKING TOPS AND BOTTOMS OF HTML FORMS
lib/HTML/FormTemplate.pm view on Meta::CPAN
%{$defin->fetch_value( $FKEY_TAG_ATTR )},
name => $defin->fetch_value( $FKEY_NAME ),
);
$params{size} ||= scalar( @{$ra_values} );
# Set up attributes that are unique to popup menus. They are
# different in that only one item can be displayed at a time, and
# correspondingly the user can only choose one item at a time.
if( $defin->fetch_value( $FKEY_TYPE ) eq 'popup_menu' ) {
$params{size} = 1;
$params{multiple} = 0;
}
# Make the field HTML and return it.
lib/HTML/FormTemplate.pm view on Meta::CPAN
%{$defin->fetch_value( $FKEY_TAG_ATTR )},
name => $defin->fetch_value( $FKEY_NAME ),
);
$params{size} ||= scalar( @{$ra_values} );
# Set up attributes that are unique to popup menus. They are
# different in that only one item can be displayed at a time, and
# correspondingly the user can only choose one item at a time.
if( $defin->fetch_value( $FKEY_TYPE ) eq 'popup_menu_group' ) {
$params{size} = 1;
$params{multiple} = 0;
}
# Make sure we have a list of valid default values, and hash of said also.
lib/HTML/FormTemplate.pm view on Meta::CPAN
browsers care about it.
=head2 values
This list argument is used with selection-type fields to set the list of options
that the user can select from, and can be used with checkbox, radio, popup menu,
scrolling list, and groups of each. This property defaults to 'on' if not set
for most field types, and to NAME for single checkboxes and radio buttons.
=head2 defaults
HTML-GUI
view release on metacpan or search on metacpan
lib/HTML/GUI/screen.pm view on Meta::CPAN
=pod
=head3 openDialog
Description :
- define the next dialog to show to the end user. The difference between a dialog and a screen is that a dialog can be closed (like a popup window).
Parameters :
- $path : the path of the next screen
- $params : hash ref containing the optional params to call the next screen (for example imagine the next screen is customer_info and the param is {customer_id => 254412}
- $values : you can specify all the values you want to feed your screen (in the way you get the values from getValueHash() )
HTML-Genealogy-Map
view release on metacpan or search on metacpan
lib/HTML/Genealogy/Map.pm view on Meta::CPAN
=head1 DESCRIPTION
This module parses GEDCOM genealogy files and creates an interactive map showing
the locations of births, marriages, and deaths. Events at the same location are
grouped together in a single marker with a scrollable popup.
=head1 SUBROUTINES/METHODS
=head2 onload_render
lib/HTML/Genealogy/Map.pm view on Meta::CPAN
=item * Color-coded event indicators (green=birth, blue=marriage, red=death)
=item * Sorts events chronologically within each category
=item * Scrollable popups for locations with more than 5 events
=item * Persistent caching of geocoding results
=item * For OpenStreetMap: centers on location with most events
lib/HTML/Genealogy/Map.pm view on Meta::CPAN
return $map->onload_render();
}
# Generate HTML for grouped events
sub _generate_popup_html {
my ($events) = @_;
my $place = $events->[0]{place};
my $event_count = scalar(@$events);
lib/HTML/Genealogy/Map.pm view on Meta::CPAN
my $first = 1;
foreach my $loc_key (keys %$location_groups) {
my $events = $location_groups->{$loc_key};
my ($lat, $lon) = split /,/, $loc_key;
my $html = _generate_popup_html($events);
$map->add_marker(
point => [$lat, $lon],
html => $html,
);
lib/HTML/Genealogy/Map.pm view on Meta::CPAN
# Add markers for each location
foreach my $loc_key (keys %$location_groups) {
my $events = $location_groups->{$loc_key};
my ($lat, $lon) = split /,/, $loc_key;
my $html = _generate_popup_html($events);
$osm->add_marker(
point => [$lat, $lon],
html => $html,
);
HTML-GoogleMaps-V3
view release on metacpan or search on metacpan
lib/HTML/GoogleMaps/V3.pm view on Meta::CPAN
Add a marker to the map at the given point. A point can be a unique
place name, like an address, or a pair of coordinates passed in as
an arrayref: [ longitude, latitude ]. Will return 0 if the point
is not found and 1 on success.
If B<html> is specified, add a popup info window as well.
=cut
sub add_marker {
my ( $self,%opts ) = @_;
HTML-GoogleMaps
view release on metacpan or search on metacpan
lib/HTML/GoogleMaps.pm view on Meta::CPAN
Add a marker to the map at the given point. A point can be a unique
place name, like an address, or a pair of coordinates passed in as
an arrayref: [ longituded, latitude ].
If B<html> is specified,
add a popup info window as well. B<icon> can be used to switch to
either a user defined icon (via the name) or a standard google letter
icon (A-J).
Any data given for B<html> is placed inside a 350px by 200px div to
make it fit nicely into the Google popup. To turn this behavior off
just pass B<noformat> => 1 as well.
=item $map->add_polyline(points => [ $point1, $point2 ])
Add a polyline that connects the list of points. Other options
HTML-HiLiter
view release on metacpan or search on metacpan
t/docs/karman-cpan.html view on Meta::CPAN
href="/src/KARMAN/Rose-HTMLx-Form-Field-Boolean-0.03/">Browse</a>]</small></td>
<td nowrap>31 Mar 2008</td>
</tr>
<tr class=s>
<td><a href="Rose-HTMLx-Form-Field-PopUpMenuNumeric-0.001/">Rose-HTMLx-Form-Field-PopUpMenuNumeric-0.001</a></td>
<td>popup menu for numeric values </td>
<td><small>[<a href="/CPAN/authors/id/K/KA/KARMAN/Rose-HTMLx-Form-Field-PopUpMenuNumeric-0.001.tar.gz">Download</a>] [<a
href="/src/KARMAN/Rose-HTMLx-Form-Field-PopUpMenuNumeric-0.001/">Browse</a>]</small></td>
<td nowrap>27 Feb 2009</td>
</tr>
<tr class=r>
HTML-JQuery
view release on metacpan or search on metacpan
lib/auto/HTML/JQuery/static/js/jquery-ui.min.js view on Meta::CPAN
b.fillSpace};if(!b.proxied)b.proxied=b.animated;if(!b.proxiedDuration)b.proxiedDuration=b.duration;b.animated=a.isFunction(b.proxied)?b.proxied(e):b.proxied;b.duration=a.isFunction(b.proxiedDuration)?b.proxiedDuration(e):b.proxiedDuration;h=a.ui.acco...
"aria-selected":"false",tabIndex:-1}).blur();d.prev().attr({"aria-expanded":"true","aria-selected":"true",tabIndex:0}).focus()},_completed:function(d){this.running=d?0:--this.running;if(!this.running){this.options.clearStyle&&this.toShow.add(this.toH...
animations:{slide:function(d,c){d=a.extend({easing:"swing",duration:300},d,c);if(d.toHide.size())if(d.toShow.size()){var e=d.toShow.css("overflow"),h=0,g={},i={},b;c=d.toShow;b=c[0].style.width;c.width(parseInt(c.parent().width(),10)-parseInt(c.css("...
g[j]={value:f[1],unit:f[2]||"px"}});d.toShow.css({height:0,overflow:"hidden"}).show();d.toHide.filter(":hidden").each(d.complete).end().filter(":visible").animate(i,{step:function(f,j){if(j.prop=="height")h=j.end-j.start===0?0:(j.now-j.start)/(j.end-...
paddingTop:"hide",paddingBottom:"hide"},d);else d.toShow.animate({height:"show",paddingTop:"show",paddingBottom:"show"},d)},bounceslide:function(d){this.slide(d,{easing:d.down?"easeOutBounce":"swing",duration:d.down?1E3:200})}}})})(jQuery);
(function(a){var d=0;a.widget("ui.autocomplete",{options:{appendTo:"body",autoFocus:false,delay:300,minLength:1,position:{my:"left top",at:"left bottom",collision:"none"},source:null},pending:0,_create:function(){var c=this,e=this.element[0].ownerDoc...
false;var i=a.ui.keyCode;switch(g.keyCode){case i.PAGE_UP:c._move("previousPage",g);break;case i.PAGE_DOWN:c._move("nextPage",g);break;case i.UP:c._move("previous",g);g.preventDefault();break;case i.DOWN:c._move("next",g);g.preventDefault();break;cas...
c.element.val()){c.selectedItem=null;c.search(null,g)}},c.options.delay);break}}}).bind("keypress.autocomplete",function(g){if(h){h=false;g.preventDefault()}}).bind("focus.autocomplete",function(){if(!c.options.disabled){c.selectedItem=null;c.previou...
this.menu=a("<ul></ul>").addClass("ui-autocomplete").appendTo(a(this.options.appendTo||"body",e)[0]).mousedown(function(g){var i=c.menu.element[0];a(g.target).closest(".ui-menu-item").length||setTimeout(function(){a(document).one("mousedown",function...
c.element.val(i.value)},selected:function(g,i){var b=i.item.data("item.autocomplete"),f=c.previous;if(c.element[0]!==e.activeElement){c.element.focus();c.previous=f;setTimeout(function(){c.previous=f;c.selectedItem=b},1)}false!==c._trigger("select",g...
a.fn.bgiframe&&this.menu.element.bgiframe()},destroy:function(){this.element.removeClass("ui-autocomplete-input").removeAttr("autocomplete").removeAttr("role").removeAttr("aria-autocomplete").removeAttr("aria-haspopup");this.menu.element.remove();a.W...
e&&this.xhr&&this.xhr.abort()},_initSource:function(){var c=this,e,h;if(a.isArray(this.options.source)){e=this.options.source;this.source=function(g,i){i(a.ui.autocomplete.filter(e,g.term))}}else if(typeof this.options.source==="string"){h=this.optio...
this.options.source},search:function(c,e){c=c!=null?c:this.element.val();this.term=this.element.val();if(c.length<this.options.minLength)return this.close(e);clearTimeout(this.closing);if(this._trigger("search",e)!==false)return this._search(c)},_sea...
this.pending--;this.pending||this.element.removeClass("ui-autocomplete-loading")},close:function(c){clearTimeout(this.closing);if(this.menu.element.is(":visible")){this.menu.element.hide();this.menu.deactivate();this._trigger("close",c)}},_change:fun...
e.value,value:e.value||e.label},e)})},_suggest:function(c){var e=this.menu.element.empty().zIndex(this.element.zIndex()+1);this._renderMenu(e,c);this.menu.deactivate();this.menu.refresh();e.show();this._resizeMenu();e.position(a.extend({of:this.eleme...
a.each(e,function(g,i){h._renderItem(c,i)})},_renderItem:function(c,e){return a("<li></li>").data("item.autocomplete",e).append(a("<a></a>").text(e.label)).appendTo(c)},_move:function(c,e){if(this.menu.element.is(":visible"))if(this.menu.first()&&/^p...
HTML-ListScraper
view release on metacpan or search on metacpan
testdata/reddit.html view on Meta::CPAN
subreddits</a>|<a href="/feedback">feedback</a>|<a href="/bookmarklets">bookmarklets</a>|<a href="/.rss">rss</a>|<a href="http://reddit.com/buttons">buttons</a>|<a href="http://reddit.com/widget">widget</a>|<a href="http://store.reddit.com/index....
</p>
<p class="bottommenu">Use of this site constitutes acceptance of our <a href="http://reddit.com/help/useragreement">User Agreement</a> and <a href="http://reddit.com/help/privacypolicy">Privacy Policy</a>. (c) 2007 CondeNet, Inc. All rights reserved....
</div>
<div id="cover" style="display:none" onclick="hide('cover', 'loginpopup')">
</div>
<div id="loginpopup" style="display: none">
<table>
<tr><td colspan="2" style="text-align: center"><h2 class="error">
please log in or register in to vote for the links you like or dislike. this will affect their ranking <i>and</i> help customize reddit for you.
</h2></td></tr>
<tr>
testdata/reddit.html view on Meta::CPAN
</td>
</tr>
</table>
<div class="center">
<a href="javascript:hide('cover','loginpopup')">close this window</a>
</div>
</div>
</body></html>
HTML-Menu-DateTime
view release on metacpan or search on metacpan
lib/HTML/Menu/DateTime.pm view on Meta::CPAN
__END__
=head1 NAME
HTML::Menu::DateTime - Easily create popup menus for use with templates.
=head1 SYNOPSIS
use HTML::Menu::DateTime;
HTML-Menu-Select
view release on metacpan or search on metacpan
lib/HTML/Menu/Select.pm view on Meta::CPAN
require Exporter;
our @ISA = qw( Exporter );
our @EXPORT_OK = qw(
options menu popup_menu
);
our %EXPORT_TAGS = ( all => \@EXPORT_OK );
our @KNOWN_KEYS = qw(
name value values default defaults labels attributes size multiple override );
sub popup_menu { &menu };
sub menu {
my %arg = (ref $_[0]) ? %{$_[0]} : @_;
my $html = '';
lib/HTML/Menu/Select.pm view on Meta::CPAN
</select>
C<options()> accepts the same parameters as L<"menu()">, but the C<name>
parameter is ignored.
=head2 popup_menu()
C<popup_menu()> is an alias for L<"menu()"> for those familiar with
CGI.
=head1 HTML escaping
If any of the following modules are already loaded into memory, their own
lib/HTML/Menu/Select.pm view on Meta::CPAN
=item Arguments may be passed as a hash-reference, rather than a hash.
This allows compile time checking, rather than runtime.
popup_menu( name => $name );
# OR
popup_menu( {name => $name} );
=back
Arguments to the L<"menu()">, L<"options()"> and L<"popup_menu()"> functions
are similar to CGI.pm's, excepting the following differences.
=over
=item Named arguments should not have a leading dash
popup_menu( name => $name );
# NOT
# popup_menu( -name => $name );
=item Positional arguments are not supported
popup_menu( name => $name, labels => \@labels );
# NOT
# popup_menu( $name, \@labels );
=item Attribute names not lowercased
An argument to CGI.pm's popup_menu such as C<-onChange => 'check()'> will
output the HTML C<onchange="check()">.
This module will retain the case, outputting C<onChange="check()">.
=item The C<optgroup> function is not yet supported
HTML-Merge
view release on metacpan or search on metacpan
lib/HTML/Merge.pm view on Meta::CPAN
connectivity and debugging. It has an embedded debugging tool and on-line
configuration. To turn that option on, set DEVELOPMENT to 1 in the
configuration file. Don't forget to set it off before deployment.
Configuration can be changed during development using the toolkit menues,
toolkit menues apear as popup windows on your web browser when you open
a URL of mrege.pl.
Alternate configuration files can appear in B</etc/merge.conf> and B<$HOME/.merge>.
As described in the INSTALL document you B<must> set your web server for
HTML-OSM
view release on metacpan or search on metacpan
lib/HTML/OSM.pm view on Meta::CPAN
=head3 API SPECIFICATION
=head4 INPUT
point : arrayref [lat, lon] | string address | object with latitude()/longitude()
html : string (optional popup label)
icon : string (optional icon URL)
=head4 OUTPUT
{ type => integer, enum => [0, 1] }
lib/HTML/OSM.pm view on Meta::CPAN
|--------------------------------------|---------------------------------------------|
| add_marker(): unknown point type | Point is a ref type with no lat/lon methods |
=head3 EXAMPLES
# Coordinate array with a popup label
$map->add_marker([51.5074, -0.1278], html => 'London');
# String address geocoded via the injected geocoder or Nominatim
$map->add_marker('Paris, France', html => 'Paris');
# Custom icon URL with a popup
$map->add_marker(
[40.7128, -74.0060],
html => 'New York',
icon => 'https://example.com/pin.png',
);
lib/HTML/OSM.pm view on Meta::CPAN
=head2 add_geojson
Add a GeoJSON layer to the map.
$map->add_geojson(\%data, style => { color => '#ff0000' }, popup => 'name');
The first argument may be a hashref/arrayref (GeoJSON structure) or a JSON string.
Returns 1 on success.
=head3 API SPECIFICATION
=head4 INPUT
data : hashref | arrayref | string (JSON)
style : hashref Leaflet path-style options (color, weight, fillColor, fillOpacity)
popup : string Feature property name whose value becomes the popup text
=head4 OUTPUT
{ type => integer, value => 1 }
lib/HTML/OSM.pm view on Meta::CPAN
|----------------------|---------------------------------|
| (JSON parse error) | data string is not valid JSON |
=head3 EXAMPLES
# Pre-parsed GeoJSON structure with style and popup property
$map->add_geojson(
{ type => 'FeatureCollection', features => \@features },
style => { color => '#ff0000', weight => 2, fillOpacity => 0.4 },
popup => 'name',
);
# Raw JSON string — decoded automatically
$map->add_geojson('{"type":"FeatureCollection","features":[]}');
lib/HTML/OSM.pm view on Meta::CPAN
# String address resolved via the injected geocoder or Nominatim
$map->center('Eiffel Tower, Paris, France');
# Required when rendering without point markers (GeoJSON-only, choropleth, etc.)
$map->center([54.0, -2.0]);
$map->add_geojson(\%uk_regions, popup => 'name');
my ($head, $body) = $map->onload_render();
=cut
sub center
lib/HTML/OSM.pm view on Meta::CPAN
print "Content-Type: text/html\n\n";
print "<html><head>$head</head><body>$body</body></html>\n";
# Mixed layers: markers + GeoJSON, explicit center
$map->center([51.5, -0.1]);
$map->add_geojson(\%borough_data, popup => 'name', style => { color => '#333' });
$map->add_marker([51.5074, -0.1278], html => 'City of London');
my ($head_html, $body_html) = $map->onload_render();
# Template Toolkit integration
$tt->process('map.tt', {
lib/HTML/OSM.pm view on Meta::CPAN
my $add_cmd = $self->{cluster}
? 'clusterGroup.addLayer(m);'
: 'm.addTo(map);';
$body .= qq{
(function() {
var icon = L.icon({ iconUrl: '$js_icon', iconAnchor: [16,32], popupAnchor: [0,-32] });
var m = L.marker([$lat, $lon], { icon: icon }).bindPopup('$js_label');
$add_cmd
})();
};
} elsif($self->{cluster}) {
lib/HTML/OSM.pm view on Meta::CPAN
# GeoJSON layers.
for my $layer (@$geojson_layers) {
my $json = _html_json($layer->{data});
my $opts = $layer->{opts} || {};
my $style_js = '';
my $popup_js = '';
if(my $style = $opts->{style}) {
$style_js = 'style: ' . _html_json($style) . ',';
}
if(my $prop = $opts->{popup}) {
my $js_prop = _js_string($prop);
$popup_js = "onEachFeature: function(f,l){ if(f.properties && f.properties['$js_prop']){ l.bindPopup(String(f.properties['$js_prop'])); } },";
}
$body .= "\t\t\tL.geoJSON($json, { $style_js $popup_js }).addTo(map);\n";
}
# Heatmap layers.
for my $layer (@$heatmap_layers) {
my $pts = _html_json($layer->{points});
lib/HTML/OSM.pm view on Meta::CPAN
AddGeoJSON
ΔHTML_OSM
data? : GeoJSONStruct ∪ S
style? : StyleMap ∪ {∅}
popup? : S ∪ {∅}
-----------------------------------------
geojson' = geojson ⌢ ⟨{data, style, popup}⟩
=head2 add_heatmap
AddHeatmap
ΔHTML_OSM
HTML-Object
view release on metacpan or search on metacpan
lib/HTML/Object/DOM/Element.pm view on Meta::CPAN
See L<for more information|https://developer.mozilla.org/en-US/docs/Web/API/Node/textContent>
=head2 title
A string containing the text that appears in a popup box when mouse is over the element.
See L<Mozilla documentation|https://developer.mozilla.org/en-US/docs/Web/API/HTMLElement/title> for more information.
=head2 translate
HTML-PopupTreeSelect
view release on metacpan or search on metacpan
PopupTreeSelect.pm view on Meta::CPAN
our $VERSION = "1.6";
our $TEMPLATE_SRC;
=head1 NAME
HTML::PopupTreeSelect - HTML popup tree widget
=head1 SYNOPSIS
use HTML::PopupTreeSelect;
PopupTreeSelect.pm view on Meta::CPAN
# include it in your HTML page, for example using HTML::Template:
$template->param(category_select => $select->output);
=head1 DESCRIPTION
This module creates an HTML popup tree selector. The HTML and
Javascript produced will work in Mozilla 1+ (Netscape 6+) on all
operating systems, Microsoft IE 5+ and Safari 1.0. For an example,
visit this page:
http://sam.tregar.com/html-popuptreeselect/example.html
I based the design for this widget on the xTree widget from WebFX.
You can find it here:
http://webfx.eae.net/dhtml/xtree/
PopupTreeSelect.pm view on Meta::CPAN
place where your webserver can reach them. By default this is empty
and the widget expects to find images in the current directory.
=item width (optional)
Set this to the width of the popup window. Defaults to 200.
=item height (optional)
Set this to the height of the tree box inside the window. This
defaults to 0 which allows the chooser to grow as the tree expands.
HTML-ReportWriter
view release on metacpan or search on metacpan
ReportWriter.pm view on Meta::CPAN
{
get => 'successful',
sql => "l.successful",
display => 'Successful',
sortable => 1,
draw_func => sub { my ($data, $cols) = @_; my $lid = $cols->{'id'}; my $color = ($data eq 'no' ? 'red' : ($data eq 'yes' ? 'green' : 'black')); return "<a style=\"color: $color;\" href=\"#\" onClick=\"popup('/cgi-bin/reports/message.cgi?id=$...
},
]
and
ReportWriter.pm view on Meta::CPAN
</td></tr>
</table>
</center>
[%- IF(export_link) %]
<script language="JavaScript">
function export_popup(url)
{
window.open (url,'filedl','toolbar=yes,location=no,directories=no,status=no,menubar=yes,scrollbars=yes,resizable=yes,copyhistory=no,width=300,height=400,screenX=0,screenY=0,top=0,left=0');
}
</script>
<p align="center">[% export_data_to %]: [ <a href="#" onClick="javascript:export_popup('[% export_link %]'); return false;">[% export_value %]</a> ]</p>
[%- END %]
<br /><br />
[% html_footer %]
</body>
</html>
HTML-Scrape
view release on metacpan or search on metacpan
t/perldoc.html view on Meta::CPAN
</button>
<a class="navbar-brand" href="/">Perldoc Browser</a>
<div class="collapse navbar-collapse" id="navbarNav">
<ul class="navbar-nav mr-auto">
<li class="nav-item dropdown text-nowrap">
<a class="nav-link dropdown-toggle" href="#" id="dropdownlink-stable" role="button" data-toggle="dropdown" aria-haspopup="true" aria-expanded="false">5.36.1</a>
<div class="dropdown-menu" aria-labelledby="dropdownlink-stable">
<a class="dropdown-item" href="/">Latest</a>
<div class="dropdown-divider"></div>
<a class="dropdown-item active" href="/5.36.1/">5.36.1</a>
<a class="dropdown-item" href="/5.36.0/">5.36.0</a>
t/perldoc.html view on Meta::CPAN
<a class="dropdown-item" href="/5.005_01/">5.005_01</a>
<a class="dropdown-item" href="/5.005/">5.005</a>
</div>
</li>
<li class="nav-item dropdown text-nowrap">
<a class="nav-link dropdown-toggle" href="#" id="dropdownlink-dev" role="button" data-toggle="dropdown" aria-haspopup="true" aria-expanded="false">Dev</a>
<div class="dropdown-menu" aria-labelledby="dropdownlink-dev">
<a class="dropdown-item" href="/blead/">blead</a>
<a class="dropdown-item" href="/5.38.0-RC2/">5.38.0-RC2</a>
<a class="dropdown-item" href="/5.38.0-RC1/">5.38.0-RC1</a>
<div class="dropdown-divider"></div>
t/perldoc.html view on Meta::CPAN
<a class="dropdown-item" href="/5.33.1/">5.33.1</a>
<a class="dropdown-item" href="/5.33.0/">5.33.0</a>
</div>
</li>
<li class="nav-item dropdown text-nowrap">
<a class="nav-link dropdown-toggle" href="#" id="dropdownlink-nav" role="button" data-toggle="dropdown" aria-haspopup="true" aria-expanded="false">Documentation</a>
<div class="dropdown-menu" aria-labelledby="dropdownlink-nav">
<a class="dropdown-item" href="/perl">Perl</a>
<a class="dropdown-item" href="/perlintro">Intro</a>
<a class="dropdown-item" href="/perl#Tutorials">Tutorials</a>
<a class="dropdown-item" href="/perlfaq">FAQs</a>
HTML-Selector-Element
view release on metacpan or search on metacpan
t/005_nth-of-type.t view on Meta::CPAN
</ul>
</div>
<ul class="navbar-nav ml-md-auto">
<li class="nav-item dropdown">
<a class="nav-item nav-link dropdown-toggle mr-md-2" href="#" id="bd-versions" data-toggle="dropdown" aria-haspopup="true" aria-expanded="false">
v4.4
</a>
<div class="dropdown-menu dropdown-menu-md-right" aria-labelledby="bd-versions">
<a class="dropdown-item active" href="/docs/4.4/">Latest (4.4.x)</a>
<a class="dropdown-item" href="https://getbootstrap.com/docs/4.3/">v4.3.1</a>
HTML-TableContent
view release on metacpan or search on metacpan
t/html/horizontal/facebook.html view on Meta::CPAN
under specified namespace and update the mapping if necessary and pass
permission check</p></td></tr><tr class="row_1 _5m29 _5m27"><td><span><code>payload</code></span><div class="_yb">Object</div></td><td><p>Payload representing users to delete</p></td></tr><tr class="row_1-0 _5m29 hidden_elem"><td class="dev...
<div class="hidden_elem"><code id="u_0_19"> <header class="_83k fixed_elem"><div class="_83l"><input type="checkbox" id="drawer-toggle" name="_2voo" /><label for="drawer-toggle" class="_2voo" id="drawer-toggle-label"> ☰ </label><a class="_42xr" hre...
<div class="hidden_elem"><code id="u_0_1e"> <div class="_3wm0"><div class="_6a _6b _344-"><div class="_6a _6b uiPopover" id="u_0_1b"><a class="_42ft _344_ _2agf _p" role="button" href="#" data-click-area="left_side_nav_selector" aria-haspopup="true" ...
<div class="hidden_elem"><code id="u_0_1g"> <div id="u_0_1f"></div> --></code></div>
<div class="hidden_elem"><code id="u_0_1i"> <div class="_5uw3"><div class="_4-u2 _5uw4 _4-u8"><div class="_4-u3 _5xk2"><form rel="async" action="/x/ajax/feedback/" method="post" onsubmit="return window.Event && Event.__inlineSubmit &&...
HTML-Tag
view release on metacpan or search on metacpan
let me describe the DATE widget.
This is a date control built with three combo (select) input field. With
these combos you can select day, month and year.
You can also select date by pressing a button that opens a popup
calendar (http://www.dynarch.com/projects/calendar/).
Another way, and this is great for me, is the ability to enter date
directly with keyboard. If you press a key the combobox becomes a
textbox and this give you the possibility to enter date with keyboard
HTML-TagHelper
view release on metacpan or search on metacpan
lib/HTML/TagHelper.pm view on Meta::CPAN
}
sub _convert_options_to_javascript {
my ( $self, $html_options, $url ) = @_;
my $confirm = delete $html_options->{confirm};
my $popup = delete $html_options->{popup};
my $method = delete $html_options->{method};
my $href = delete $html_options->{href};
$html_options->{onclick} =
( $popup && $method )
? return("You can't use :popup and :method in the same link\n")
: ( $confirm && $popup ) ? "if ("
. $self->_confirm_javascript_function($confirm) . ") { "
. $self->_popup_javascript_function($popup)
. " };return false;"
: ( $confirm && $method ) ? "if ("
. $self->_confirm_javascript_function($confirm) . ") { "
. $self->_method_javascript_function($method)
. " };return false;"
: ($confirm)
? "return " . $self->_confirm_javascript_function($confirm) . ";"
: ($method) ? $self->_method_javascript_function( $method, $url, $href )
. "return false;"
: ($popup) ? $self->_popup_javascript_function($popup) . ' return false;'
: $html_options->{onclick};
return $html_options;
}
sub _confirm_javascript_function {
my ( $self, $confirm ) = @_;
return "confirm('" . $self->_escape_javascript($confirm) . "')";
}
sub _popup_javascript_function {
my ( $self, $popup ) = @_;
return ( ref $popup eq 'ARRAY' )
? "window.open(this.href, '"
. shift(@$popup) . "', '"
. pop(@$popup) . "');"
: "window.open(this.href);";
}
sub _method_javascript_function {
my ( $self, $method, $url, $href ) = @_;
HTML-TagParser
view release on metacpan or search on metacpan
t/sample/yahoo.html view on Meta::CPAN
<tr><td height="10"></td></tr>
<tr><td align="center">
<table cellpadding="0" cellspacing="0" border="0">
<tr><td class="manage_box">
<table cellpadding="0" cellspacing="0" border="0" width="120" height="120">
<tr><td bgcolor="#ffffff"><a href="javascript:popupImg('pf_img',180,180)"><img src="http://img.blogs.yahoo.co.jp/ybi/1/3a/98/kawa_kawa_kawa_kawa/home/kawa_kawa_kawa_kawa_thumb?1111239698" id="pf_img" width="120" height="120" border="0" alt...
</table>
</td></tr>
</table>
</td></tr>
<tr><td height="10"></td></tr>
HTML-Template-Associate-FormField
view release on metacpan or search on metacpan
lib/HTML/Template/Associate/FormField.pm view on Meta::CPAN
sub __button { button($_[1]) }
sub __reset { reset($_[1]) }
sub __defaults { defaults($_[1]) }
sub __checkbox { checkbox(&_proc_defaults) }
sub __checkbox_group { checkbox_group(&_proc_defaults) }
sub __popup_menu { popup_menu(&_proc_defaults) }
sub __scrolling_list { scrolling_list(&_proc_defaults) }
sub __select { &__popup_menu }
sub __radio_group { radio_group(&_proc_default) }
sub __radio { &__radio_group }
sub __image_button { image_button($_[1]) }
sub __image { image_button($_[1]) }
sub __submit { submit($_[1]) }
lib/HTML/Template/Associate/FormField.pm view on Meta::CPAN
The value of designate to type is same as method for making Form Field of
CGI.pm. B<Please refer to document of CGI.pm for details>.
B<startform> , B<start_multipart_form> , B<endform> , B<textfield> ,
B<filefield> , B<password_field> , B<textarea> , B<checkbox> , B<radio_group>
, B<popup_menu> , B<optgroup> , B<scrolling_list> , B<image_button> ,
B<defaults> , B<button> , B<reset>
=item *
And others, be possible to designate for extension Field type
lib/HTML/Template/Associate/FormField.pm view on Meta::CPAN
B<password> ... other name of password_field.
B<radio> ... other name of radio_group.
B<select> ... other name of popup_menu.
B<image> ... other name of image_button.
I<(%) In case of no indication Field was set up ,
connect the no indication Field and return the value.>
HTML-Template-Pro
view release on metacpan or search on metacpan
lib/HTML/Template/SYNTAX.pod view on Meta::CPAN
Q: What's the best way to create a <select> form element using
HTML::Template?
A: There is much disagreement on this issue. My personal preference
is to use CGI.pm's excellent popup_menu() and scrolling_list()
functions to fill in a single <tmpl_var select_foo> variable.
To some people this smacks of mixing HTML and code in a way that they
hoped HTML::Template would help them avoid. To them I'd say that HTML
is a violation of the principle of separating design from programming.
HTML-Template
view release on metacpan or search on metacpan
lib/HTML/Template/FAQ.pm view on Meta::CPAN
for writing L<HTML::Template::Expr> in the first place.
=head2 What's the best way to create a <select> form element using HTML::Template?
There is much disagreement on this issue. My personal preference is
to use L<CGI.pm>'s excellent C<popup_menu()> and C<scrolling_list()>
functions to fill in a single C<< <tmpl_var select_foo> >> variable.
To some people this smacks of mixing HTML and code in a way that
they hoped L<HTML::Template> would help them avoid. To them I'd say
that HTML is a violation of the principle of separating design from
HTML-Tooltip-Javascript
view release on metacpan or search on metacpan
lib/HTML/Tooltip/Javascript.pm view on Meta::CPAN
For example, to output a tooltip for a link:
my $tip1 = $tt->tooltip("Example Tip", {fontcolor => 'blue'});
print qq(<a href="/example/" $tip1>Example</a>);
This would output a link with text 'Example', and when the mouse pointer hovers over the link, a popup box with the words 'Example Tip' in blue would appear.
Any options passed into to the tooltip() method will overwrite the values provided in the new method. However, options provided in the new method will be inherited unless specifically undefined in the tooltip method.
=head2 at_end
HTML-TreeStructured
view release on metacpan or search on metacpan
lib/HTML/TreeStructured.pm view on Meta::CPAN
color = Color of the node name
mouseover = Mouse Over text for the node (Info image is displayed next to node)
active = 0 would cause strike thru on node
highlight = color code used for marker highlight of node
url = URL to hyperlink the node
tooltip = popup when mouse is over the link (together with url) (See HTML::Tooltip::Javascript)
closed = 1 if node be closed on default display (default, all nodes are open)
comment = Text to display next to node in bold
weight = A numeric value on node which will be used for sorting node position in at sibling level
(Default, nodes are sorted in ascending order per dictionary order)
lib/HTML/TreeStructured.pm view on Meta::CPAN
id => $id, ### Unique Id (no immediate use, but good to have)
open => display_closed_node($depth, $level, $node->{closed}) ? 0 : 1,
### During Display, whether to close/open
url => $node->{url}, ### Url to link
mouseover => $node->{mouseover}, ### mouseover message
tooltip => $node->{tooltip}, ### Tooltip popup box (See HTML::Tooltip::Javascript)
active => ((defined($node->{active}) and $node->{active} == 0) ? 0 : 1),
### Is this node active? If not, strike thru during display
color => $node->{color} || 'black', ### Color of the label
highlight => $node->{highlight}, ### Color to use for marker highlight
comment => $node->{comment}, ### Comment in bold within parentheses next to label
( run in 2.337 seconds using v1.01-cache-2.11-cpan-364913b4093 )