view release on metacpan or search on metacpan
Wyrd/SQLForm.pm view on Meta::CPAN
=cut
sub default_update_ok {
my ($self) = @_;
return "<BR>The record was successfully updated";
}
=item (scalar) C<primary_delete_error> (void)
Format the log entry that occurs when the edited record cannot be
Wyrd/SQLForm.pm view on Meta::CPAN
sub _added_hook {
my ($self, $spec) = @_;
$self->_logger_hook($spec, 'added');
}
=item (scalar) C<_updated_hook> (hashref)
Like the _deleted_hook above.
=cut
sub _updated_hook {
my ($self, $spec) = @_;
$self->_logger_hook($spec, 'updated');
}
=item C<_sets>, C<_join_sets>, C<_split_sets>
Hook methods for dealing with data which may arrive from CGI as an array, but is submitted in the form of a comma-joined set of values. These are usually data in a SET or ENUM column within an SQL database table.
Wyrd/SQLForm.pm view on Meta::CPAN
$log_title = $self->default_error;
$log .= $self->default_update_error($err);
} else {
$log .= $self->default_update_ok;
}
$self->_updated_hook({table=>$table,column=>$index,value=>$var{$index}});
} else {#Perform an insert
delete($var{$index}) unless ($self->_flags->check_index);
my $sh = $self->do_query("insert into $table set " . set_clause(keys(%var)), \%var);
my $err = $sh->errstr;
if ($err) {
view all matches for this distribution
view release on metacpan or search on metacpan
lib/Apache/XBEL.pm view on Meta::CPAN
nodes may be viewed and bookmarked as unique pages, so you don't
have to click through a gazillion nested leaves to find what
you're looking for.
Once individual nodes/pages have been rendered, they are cached
to reduce the load on the server. Cache files are updated
whenever any of the widgets involved in the transformation are
modified.
=head1 OPTIONS
view all matches for this distribution
view release on metacpan or search on metacpan
and added XPointerCGIAcceptParam config options.
- Updated dependency for Apache::XPointer to 1.1
- Overloaded Apache::XPointer::RDQL::Parser's "" operator
and updated internal (unducomented) code to reflect changes
in Apache::XPointer 1.1
- Updated and fixed a bunch of errors in the POD
1.0 Mon Nov 15, 2004
view all matches for this distribution
view release on metacpan or search on metacpan
- Updated POD
1.01 Mon Nov 15, 2004
- updated POD to include Apache::XPointer::RDQL in
list of supported schemes
1.0 Sat Nov 13, 2004
- Bless as 1.0
view all matches for this distribution
view release on metacpan or search on metacpan
lib/DBIx/SearchProfiles.pm view on Meta::CPAN
=head2 record_update ( $name, \%params );
This method will update a record in the table specified by the profile
$name. The I<params> argument is a reference to an hash which contains
the record data to be updated. The hash should contains one element
for each key specified in the I<keys> field of the profile. Each
elements in the fields that is a valid table fields (as specified by
the I<fields> element of the profile) will be updated. Any elements
specified I<defaults> and not present in the I<params> hash will also
be updated.
Return value is undefined.
=cut
lib/DBIx/SearchProfiles.pm view on Meta::CPAN
=head2 template_update ( $name, params )
This method will update records according to the profile $name and
using standard template's placholders substitutions semantics.
Return value is the number of rows updated.
=cut
sub template_update {
my $self = shift;
view all matches for this distribution
view release on metacpan or search on metacpan
0.11 - Thu Oct 25 21:31:21 2007
* Squashing warnings from the code.
0.10 - Tue Jan 9 23:05:47 2007
* updated copyright and license info
* no code changes, so no need to upgrade
0.09 - Wed May 17 22:22:22 2006
* updates to distro and kwalitee. No need to upgrade.
view all matches for this distribution
view release on metacpan or search on metacpan
lib/Apache2/API/Response.pm view on Meta::CPAN
}
else
{
# Remove all Set-Cookie headers
$self->err_headers->unset( 'Set-Cookie' );
# Now, re-add our updated set
foreach my $cookie_str ( @cookie_headers )
{
$self->err_headers->add( 'Set-Cookie' => $cookie_str );
}
}
view all matches for this distribution
view release on metacpan or search on metacpan
lib/Apache2/ASP/MediaManager.pm view on Meta::CPAN
}
sub after_update {
my ($s, $context, $Upload) = @_;
warn "Just updated '$Upload->{filename_only}'";
return $Response->Redirect( $ENV{HTTP_REFERER} );
}
sub after_delete {
my ($s, $context, $filename) = @_;
lib/Apache2/ASP/MediaManager.pm view on Meta::CPAN
=head1 UPLOAD PROGRESS INDICATORS
C<Apache2::ASP::MediaManager> makes it easy to provide upload progress indicators.
Remember that C<uploadID> parameter in the C<action> attribute of your form? While
the upload is taking place, the C<$Session> object is getting updated with the
status of the upload. If you were to make another handler - C</handlers/UploadProgress.pm> -
and insert the following code:
package UploadProgress;
lib/Apache2/ASP/MediaManager.pm view on Meta::CPAN
=head2 before_update( $self, $context, $Upload )
Called before allowing a new file to be uploaded to replace an existing file.
B<NOTE>: This method must return true, or the file will not be updated.
=head2 after_update( $self, $context, $Upload )
Called after a new file has been uploaded to replace an existing file.
view all matches for this distribution
view release on metacpan or search on metacpan
lib/Apache2/Ajax.pm view on Meta::CPAN
configuration directive I<PJX_fn>, to be described below.
=item * my $html = $ajax-E<gt>build_html(%build_args);
This returns the HTML used for the web page, either the
complete html for the whole page or the updated html;
this corresponds to the I<build_html()> method of
L<CGI::Ajax>. This method also accepts optional
arguments, in the form of a hash, of two types:
=over
view all matches for this distribution
view release on metacpan or search on metacpan
0.01 Wed Aug 16 09:07:59 2000
- original version; created by h2xs 1.19
0.20 Mon Jun 10 06:33:30 2003
- Makefile.PL updated to prompt for automatic downloading of module dependencies.
- using ExtUtils::AutoInstall Makefile now prompts for prereqs Net::LDAP and mod_perl
- AuthNetLDAP.pm modified to work with both mod_perl 1 and mod_perl-1.99 or greater
0.21 Tue Jun 11 06:33:30 2003
- Move $VERSION number variable above the BEGIN block so that PAUSE will
view all matches for this distribution
view release on metacpan or search on metacpan
my $passwd = prompt 'Enter new Apache2::Authen::Passphrase password: ';
my $confirm = prompt 'Retype new Apache2::Authen::Passphrase password: ';
die "Sorry, passwords do not match\n" unless $passwd eq $confirm;
pwset $username, $passwd;
say 'Password updated successfully'; ## no critic (RequireCheckedSyscalls)
__END__
=head1 NAME
=head1 SYNOPSIS
user@hostname:~$ aap-passwd /path/to/rootdir marius
Enter new Apache2::Authen::Passphrase password: ***
Retype new Apache2::Authen::Passphrase password: ***
Password updated successfully
=head1 DESCRIPTION
aap-passwd updates the password of an Apache2::Authen::Passphrase user.
view all matches for this distribution
view release on metacpan or search on metacpan
smb/Changes view on Meta::CPAN
0.92 Jan 4 2002
- Added functions for Apache::AuthenNTLM (Gerald Richter)
0.93-0.96 Seg 3 2002
- updated smbval, fixed bugs in smbval VC count handling,
fixed bug in nonce passing
view all matches for this distribution
view release on metacpan or search on metacpan
Auth/RCS/Auth.pm,v view on Meta::CPAN
@
1.10
log
@Ported to mod_perl2 and updated HTML.
@
text
@# $Id: Auth.pm,v 1.9 2002/07/31 16:44:14 Administrator Exp $
package Apache2::AuthenSecurID::Auth;
view all matches for this distribution
view release on metacpan or search on metacpan
0.01 Thu Jun 09 14:50:00 2005
- Moving module into Apache2 namespace.
- loading Apache2::* instead of Apache::
- Modified Apache::Htgroup to Apache2::Htgroup (Contacted rbowen about porting)
- Documentation is updated.
Revision history for Perl extension Apache::AuthenSmb.
0.72 Fri Mar 26 14:50:00 2004
- split domain\username so that one can manipulate
0.60 Mon Jun 7 14:50:00 1999
- Fixed Smb->Authen::Smb deal in Makefile.PL
- Require Authen::Smb 0.9 or greater due to buffer overflow problem
0.50 Wed Mar 24 15:26:00 1999
- Change Smb to Authen::Smb and updated the documentation
0.20 Wed Jul 1 13:24:00 1998
- Fixed bug where blank username would give you access.
0.10 Fri Apr 17 10:10:10 1998
view all matches for this distribution
view release on metacpan or search on metacpan
0.03. (2008-06-29) - Adam Prime <adam.prime@utoronto.ca>
- updated to work with DirBasedHandler 0.03
view all matches for this distribution
view release on metacpan or search on metacpan
- complete API and internal rewrite
o added DispatchExtras and DispatchPrefix directive
o removed per-server configurations
o added new pre_dispatch, post_dispatch, error_dispatch
and dispatch_index method tie-ins
- updated documentation
- more kudos to Matt Sergeant for invaluable insight
0.02 8.1.2000
- thanks again to Matt Sergeant for input not limited to
the following valuable suggestions
o add DispatchBase for dispatching on a protected,
per-location basis
o add DispatchMethod Prefix for protecting methods
behind a dispatch_ prepend
- changed behavior of directory and server merges
- updated the documentation
0.01 7.28.2000
- original version
- many kudos and thanks to:
Vivek Khera
view all matches for this distribution
view release on metacpan or search on metacpan
0.02 Fri Jun 21 10:30:55 2002 Philip Collins
- made javacript control cut / copy buffer so module user does not
need to call the constructor before sending the header anymore.
- added rsync functionality
- checked for null filenames with javascript in rename and mkdir actions
- updated documentation
0.03 Fri Jun 21 11:00:11 2002 Philip Collins
- added prerequisite modules to 'PREREQ_PM' in Makefile.PL.
0.04 Fri Jun 21 04:30:00 2002 Philip Collins
- display file "type" next to filename. (similar to ls -F)
- Updated delete confirm box message.
- added go to previous directory (..) control
0.13 Thur July 11 14:32:21 Philip Collins
- updated the documentation
0.14 Thur July 11 17:15:10 Philip Collins
- updated look of application
- added the beginnings of the help section
- used CSS tags to to hovering underline
- enlarged the file upload path boxes to 40 (Hardy)
0.15 Friday July 12 20:50:02 Philip Collins
view all matches for this distribution
view release on metacpan or search on metacpan
- added Makefile.PL, so CPANPLUS testers stop failing tests because they
don't have Module::Build installed
1.01 Fri Sep 21 13:39 PDT 2007
- added explicit dependency on MP2
- updated test requirements to "need_*" instead of "have_*"
1.00 Thu Sep 20 16:47 PDT 2007
- initial version
view all matches for this distribution
view release on metacpan or search on metacpan
- added Makefile.PL, so CPANPLUS testers stop failing tests because they
don't have Module::Build installed
1.01 Fri Sep 21 13:31 PDT 2007
- added explicit dependency on MP2
- updated test requirements to "need_*" instead of "have_*"
1.00 Thu Sep 20 12:45 PDT 2007
- initial version
view all matches for this distribution
view release on metacpan or search on metacpan
lib/Apache2/PageKit/View.pm view on Meta::CPAN
die "Error loading record for page_id $page_id and view $pkit_view"
unless $record;
}
if($view->{reload} ne 'no'){
# check for updated files on disk
unless($view->_is_record_uptodate($record, $pkit_view, $page_id)){
# one of the included files changed on disk, reload
$view->_load_page($page_id, $pkit_view);
$record = $view->_fetch_from_file_cache($page_id, $pkit_view, $lang);
}
view all matches for this distribution
view release on metacpan or search on metacpan
lib/Apache2/SSI/File/Type.pm view on Meta::CPAN
# 3) Iterate over each magic entry.
my $match_found = 0;
for( my $m = 0; $m <= $#{ $self->{magic_data} }; $m++ )
{
# Check if the m-th magic entry matches and if it does, then $desc will contain
# an updated description
my $test;
if( ( $test = $self->_magic_match( $self->{magic_data}->[$m], \$desc, $io ) ) )
{
if( defined( $desc ) && $desc ne '' )
{
lib/Apache2/SSI/File/Type.pm view on Meta::CPAN
# 3) Iterate over each magic entry.
for( my $m = 0; $m <= $#{ $self->{magic_data} }; $m++ )
{
# Check if the m-th magic entry matches and if it does, then $desc will contain
# an updated description
if( $self->_magic_match_str( $self->{magic_data}->[ $m ], \$desc, $data ) )
{
if( defined( $desc ) && $desc ne '' )
{
$type = $desc;
view all matches for this distribution
view release on metacpan or search on metacpan
lib/Apache2/Translation/Admin.pm view on Meta::CPAN
if( ($oblock, $block, $oorder, $order, $id)=
$a=~/^action_(\d*)_(\d+)_(\d*)_(\d+)_(\d*)/ ) {
$action=$r->param($a);
$note=$r->param("note_${block}_${order}");
if( length $id ) {
die "ERROR: Key=$okey, Uri=$ouri, Block=$oblock, Order=$oorder, Id=$id not updated\n"
unless( 0<$prov->update( [$okey, $ouri, $oblock, $oorder, $id],
[$key, $uri, $block, $order, $action, $note] ) );
} else {
die "ERROR: Key=$key, Uri=$uri, Block=$block, Order=$order not inserted\n"
unless( 0<$prov->insert( [$key, $uri, $block, $order, $action, $note] ) );
view all matches for this distribution
view release on metacpan or search on metacpan
0.03 2005-06-08
woops, "documentation" fix.
0.02 2005-06-08
updated for mod_perl 2 >= rc5. removed dumb dependency on
nonexistent ap_save_brigade. made a test that works. i rule.
0.01 2005-02-11
First version, released on an unsuspecting world.
view all matches for this distribution
view release on metacpan or search on metacpan
total_responses_failed() method and per-run sent_requests(), good_responses(),
and failed_responses() methods
added support for global and per-url/per-run time limits
updated header files from Apache 1.3.22 src/include/
added support for HTTP HEAD requests per-url/per-run
fixed a small bug that sent a GET request for a defined-but-empty string value
in postdata() array; now it sends a POST request with Content-length: 0
view all matches for this distribution
view release on metacpan or search on metacpan
lib/Apigee/Edge/Helper.pm view on Meta::CPAN
lastName => $last_name,
userName => $loginid,
);
warn $apigee->errstr;
when param B<app> is provided, we'll update the $old_app to $app with name to be a DisplayName attr and callbackUrl updated..
when param B<app> is not provided, we'll first call get_top_developer_app to find the app to update. if app is not created yet, we'll create a new developer on the fly with email/firstName/lastName/userName and created related developer_app with name...
=head2 get_all_clients
view all matches for this distribution
view release on metacpan or search on metacpan
script/_acme-cpanauthors view on Meta::CPAN
#formatting like Log::Contextual. This eases code migration and teamwork. Each
#module author can preserve her own logging style, if wanted, and all the modules
#still use the same framework.
#
#B<Dynamic.> Outputs and levels can be changed anytime during run-time and logger
#routines will be updated automatically. This is useful in situation like a
#long-running server application: you can turn on tracing logs temporarily to
#debug problems, then turn them off again, without restarting your server.
#
#B<Interoperability.> There are modules to interop with Log::Any, either consume
#Log::Any logs (see L<Log::Any::Adapter::LogGer>) or produce logs to be consumed
view all matches for this distribution
view release on metacpan or search on metacpan
simultaneously. E.g. you can have B<acmeman> look for domain names in
B<Apache> and B<HAProxy> configurations and obtain an additional list of
domains from its own configuration, all in the same time.
In any case, B<acmeman> should be run as a periodic cron job, in order to
ensure that expiring certificates are updated in time. The usual crontab
entry (for Vixie cron) is
0 4 * * * root /usr/bin/acmeman
Exact interval configuration is entirely up to you. For Dillon cron, omit
The command line option B<--time-delta> overrides this setting.
=item B<postrenew=>I<COMMAND>
Defines the command to be run at the end of the run if at least one
certificate has been updated. Normally this command reloads the httpd
server (or whatever server is using the certificates). If more than one
B<postrenew> statements are defined, they will be run in sequence, in the
same order as they appeared in the configuration file.
I<COMMAND> inherits the environment from the B<acmeman> process, with the
Upon startup the program scans Apache configuration for virtual hosts
that use ACME certificates, checks their expiration times, and renews those
of the certificates that are nearing their expiration times within a
predefined number of seconds (24 hours by default). If any of the
certificates were updated during the run, B<acmeman> will restart the
B<httpd> server.
=head3 Setup
To set up the necessary infrastructure, run B<acmeman --setup>. It will
view all matches for this distribution
view release on metacpan or search on metacpan
lib/App/ActivityPubClient.pm view on Meta::CPAN
sub print_object {
my ($indent, $object) = @_;
my @regular_keys =
qw{url subtitleLanguage context inbox outbox prev next published updated summary content bcc bto cc to object attachment tag orderedItems mediaType};
printf "%*s %s", $indent, 'â', $object->{"type"};
printf ' id:<%s>', $object->{"id"} if $object->{"id"};
printf ' href:<%s>', $object->{"href"} if $object->{"href"};
printf ' â%sâ', $object->{"name"} if $object->{"name"};
view all matches for this distribution
view release on metacpan or search on metacpan
0.023 2012-02-27
sort entries before processing
0.022 2010-06-13
updated for new Config::MVP
0.021 2009-07-27
0.020 2009-07-27
updated for new Config::MVP
0.019 2009-01-16
update packaging a bit
0.018 2008-06-22
view all matches for this distribution
view release on metacpan or search on metacpan
Make some HTTP requests.
$ GET /blogs.json
[ {"id" : 1, "title" : "first post", "body" : "This is the first post"}, ... ]
$ PUT /blogs/2.json '{"id" : 2, "title" : "updated post", "body" : "This is the new."}'
{"id" : 2, "title" : "updated post", "body" : "This is the new."}
$ DELETE /blogs/2
$ POST /blogs.json '{"title" : "new post", "body" : "This is the new new."}'
{"id" : 204, "title" : "new post", "body" : "This is the new new."}
view all matches for this distribution