view release on metacpan or search on metacpan
crazyforyou.co.uk
crazygirl.co.uk
crazysexycool.com
crazyvisionary.co.uk
creamcrackered.co.uk
credentials.co.uk
credit4u.com
creep.co.uk
creepycrawly.co.uk
cretin.co.uk
cricketmail.com
view all matches for this distribution
view release on metacpan or search on metacpan
);
my @missing = grep { !exists $ENV{$_} } @required_vars;
if (@missing) {
plan skip_all => 'Live test credentials missing',
}
my $api_key = $ENV{TEST_MAILGUN_API_KEY};
my $domain = $ENV{TEST_MAILGUN_DOMAIN};
view all matches for this distribution
view release on metacpan or search on metacpan
lib/Enterasys/NetSight.pm view on Meta::CPAN
return $call->result->{data};
}
sub getSnmp
{
# Returns a hash reference with SNMP credentials
# The format of this hash can be used to create a
# new SNMP::Session with the Net-SNMP module
my ($self, $args)=@_;
my (%snmp, %temp)=();
lib/Enterasys/NetSight.pm view on Meta::CPAN
return \%snmp;
}
sub getAuth
{
# Runs the 'exportDevices' method if $self->{devices} hash ref is undefined
# and uses that to parse Cli credentials for all other calls.
my ($self, $args)=@_;
if(!defined $args->{host})
{ carp("You must specify a host for getAuth method") && return undef }
if($args->{refresh})
lib/Enterasys/NetSight.pm view on Meta::CPAN
return \%creds;
}
sub exportDevices
{
# Gets credentials for all devices in NetSight as an NGF string and
# parses it into a hash table
my ($self)=@_;
my %table=();
my $call=$self->{soap}->exportDevicesAsNgf;
lib/Enterasys/NetSight.pm view on Meta::CPAN
}) or die $!;
This module provides wrapper methods for raw API method calls. These methods typically parse the response and return a perl friedly hash table.
You can make any raw API call through the SOAP::Lite object accessable with $netsight->{soap}.
For example the following would print a NetSight Generated Format string containing SNMP credentials,
print $netsight->{soap}->getSnmpCredentialAsNgf($ip)->result(),"\n";
However using the getSnmp wrapper method will parse the NGF string into a hash table,
lib/Enterasys/NetSight.pm view on Meta::CPAN
IP address or hostname of a target device.
=item level
Optional, defaults to highest privilage level available. Options are su, rw, ro (super user, read/write, read only). If specified privilage does not exist method returns undef. This parameter is ignored if the device has SNMP v3 credentials.
=back
=item getAuth()
Returns a hash table containing CLI credentials: host, user, and pass. Because there is no API call to get a single CLI cred, similar to getSnmpCredentialAsNgf, this method runs the "exportDevices" method once and keeps the device information in memo...
=over
=item host
lib/Enterasys/NetSight.pm view on Meta::CPAN
a WsDevice table containing device information. Returns undef on error.
=item exportDevices()
Returns a hash table with device IP address keys and a hash reference to a table containing both
SNMP and/or CLI credentials. This method parses the NetSight Generated Format (NGF) strings returned
from the 'exportDevicesAsNgf' API call. Returns undef on error.
=item addAuth()
Add telnet/SSH authentication credential. Returns undef on error or a NsWsResult object indicating success.
lib/Enterasys/NetSight.pm view on Meta::CPAN
Integer specifying SNMP version 1, 2, or 3.
=item read
SNMP read configuration credentials name as created by addSnmp.
=item write
SNMP write configuration credentials name as created by addSnmp.
=item maxAccess
Credentials configuration to use maximum access mode to the device. Name as created by addSnmp.
=item auth
Telnet/SSH authentication credentials used in this profile. Name as created by addAuth.
=back
=item addDevice()
lib/Enterasys/NetSight.pm view on Meta::CPAN
=back
=item updateAuth()
Update existing telnet/SSH credentials. Returns undef on error or a NsWsResult object indicating success.
=over
=item username
lib/Enterasys/NetSight.pm view on Meta::CPAN
=back
=item updateSnmp()
Update existing SNMP credentials. Returns undef on error or a NsWsResult object indicating success.
=over
=item name
lib/Enterasys/NetSight.pm view on Meta::CPAN
Name for the profile.
=item read
SNMP read configuration credentials name as created by addSnmp.
=item write
SNMP write configuration credentials name as created by addSnmp.
=item maxAccess
Credentials configuration to use maximum access mode to the device. Name as created by addSnmp.
=item authCredName
Telnet/SSH authentication credentials used in this profile. Name as created by addAuth.
=back
=item ipV6Enabled()
view all matches for this distribution
view release on metacpan or search on metacpan
lib/EntityModel.pm view on Meta::CPAN
=back
Aside from entities, models can also contain plugin-specific information
such as site definition or database schema. It is also possible - but not
recommended - to store credentials such as database user and password.
Once a model definition has been loaded, it can be applied to one or more of the following:
=over 4
view all matches for this distribution
view release on metacpan or search on metacpan
lib/Eve/DbiStub.pm view on Meta::CPAN
'account_id' => 123123123,
%{$data_template_hash->{'profile_1'}}}],
[{%{$data_template_hash->{'entry_2'}},
'account_id' => 123123,
%{$data_template_hash->{'profile_2'}}}]]},
'external_profile_get_by_credentials' => {
'sql_pattern' => 'external_profile_get_by_credentials',
'input_type_list' => [DBD::Pg::PG_TEXT, DBD::Pg::PG_TEXT],
'data' => [
[{%{$data_template_hash->{'entry_1'}},
'id' => 987654321,
'account_id' => 123123123,
view all matches for this distribution
view release on metacpan or search on metacpan
lib/Event/RPC/AuthPasswdHash.pm view on Meta::CPAN
};
return $self;
}
sub check_credentials {
my $self = shift;
my ($user, $pass) = @_;
return $pass eq $self->get_passwd_href->{$user};
}
view all matches for this distribution
view release on metacpan or search on metacpan
lib/Experian/IDAuth.pm view on Meta::CPAN
Return the Experian results as a hashref
=head2 save_pdf_result()
Save the Experian credentials as a PDF
=head2 defaults()
Return default value
view all matches for this distribution
view release on metacpan or search on metacpan
lib/FAST/Bio/DB/Taxonomy/entrez.pm view on Meta::CPAN
=head2 authentication
Title : authentication
Usage : $db->authentication($user,$pass)
Function: Get/Set authentication credentials
Returns : Array of user/pass
Args : Array or user/pass
=cut
view all matches for this distribution
view release on metacpan or search on metacpan
lib/FCGI/Spawn.pm view on Meta::CPAN
The definitive care is taken in FCGI::Spawn on security.
Besides the inode settings on local UNIX socket taken as input parameter, it is aware to avoid hosting users from changing the max_requests parameter meant correspondent to MaxRequests Apache's forked MPM parameter, and the respective current request...
The aforementioned max_requests parameter takes also care about the performance to avoid forks' memory leaks to consume all the RAM accounted on your hardware.
For shared hosting it is assumed that system administrator controls the process manager daemon script contents with those user hardware consumption limits and executes it with a user's credentials.
E. g., the user should be able to send signal to the daemon to initiate graceful restart on his/her demand ( this is yet to be done ) or change the settings those administrator can specifically allow in the daemon starter script without restart ( bot...
The call stack lets you set up your own code reference for your scripts execution. Also, feature exists that you can cache some object, like the template or XSLT processor and the recompilation to happen only on the template or xsl file(s) change. En...
Seeking for convention between high preformance needs that the perl compile cache possess and the convinience of debugging with recompilation on every request that php provides, the C<stats> feature allows you not to recompile the tested source like ...
view all matches for this distribution
view release on metacpan or search on metacpan
lib/FIDO/Raw/Assert.pm view on Meta::CPAN
Create a new instance.
=head2 allow_cred( $cred )
Append the credential C<$cred> to the list of credentials allowed for this
assertion.
=head2 authdata( [$index = 0, $data] )
Get/set the authenticator data. C<$data> must be a CBOR-encoded byte
view all matches for this distribution
view release on metacpan or search on metacpan
lib/FWS/Lite.pm view on Meta::CPAN
This module provides basic input and output to a FrameWork Sites installation or can be used independently using the methodologies of FrameWork Sites data structures and file handling in a small package.
=head1 CONSTRUCTOR
Most uses of FWS::Lite are accessing data from live FWS installations and do not require anything but the database credentials. All non-required settings can be set for completeness or for the ability to run native FWS Code via FWS::Lite for testin...
=head2 new
my $fws = $fws->new(
DBName => "DBNameOrSQLitePathAndFile", # MySQL required
view all matches for this distribution
view release on metacpan or search on metacpan
lib/Facebook/OpenGraph.pm view on Meta::CPAN
# Document does not mention what grant_type is all about or what values can
# be set, but RFC 6749 covers the basic idea of grant types and its Section
# 4.4 describes Client Credentials Grant.
# http://tools.ietf.org/html/rfc6749#section-4.4
return $self->_get_token(+{grant_type => 'client_credentials'});
}
# Manually Build a Login Flow > Confirming identity > Exchanging code for an access token
# https://developers.facebook.com/docs/facebook-login/manually-build-a-login-flow
sub get_user_token_by_code {
view all matches for this distribution
view release on metacpan or search on metacpan
lib/Farabi/files/public/assets/codemirror/addon/hint/html-hint.js view on Meta::CPAN
article: s,
aside: s,
audio: {
attrs: {
src: null, mediagroup: null,
crossorigin: ["anonymous", "use-credentials"],
preload: ["none", "metadata", "auto"],
autoplay: ["", "autoplay"],
loop: ["", "loop"],
controls: ["", "controls"]
}
lib/Farabi/files/public/assets/codemirror/addon/hint/html-hint.js view on Meta::CPAN
}
},
img: {
attrs: {
alt: null, src: null, ismap: null, usemap: null, width: null, height: null,
crossorigin: ["anonymous", "use-credentials"]
}
},
input: {
attrs: {
alt: null, dirname: null, form: null, formaction: null,
lib/Farabi/files/public/assets/codemirror/addon/hint/html-hint.js view on Meta::CPAN
ul: s,
"var": s,
video: {
attrs: {
src: null, poster: null, width: null, height: null,
crossorigin: ["anonymous", "use-credentials"],
preload: ["auto", "metadata", "none"],
autoplay: ["", "autoplay"],
mediagroup: ["movie"],
muted: ["", "muted"],
controls: ["", "controls"]
view all matches for this distribution
view release on metacpan or search on metacpan
lib/AptFetch.pm view on Meta::CPAN
I<(disclaimer)>
Right now, B<F::AF> is in "proof-of-concept" state.
It surely works with local methods (F<file> and F<copy>);
I hope it will work with trivial cases of remote methods
(I<v0.1.9> I've left to hope, it totally does;
no manual interaction (credentials and/or tray closing) provided).
(B<F::AF> has no means to accept (not talking about to pass along)
authentication credentials;
So if your upstream needs authentication, B<F::AF> is of no help here.)
And one more warning:
you're supposed to do all the dirty work of managing --
B<F::AF> is only for comunication.
Hopefully, there will be someday a kind of super-module what would simplify all
view all matches for this distribution
view release on metacpan or search on metacpan
lib/File/Dropbox.pm view on Meta::CPAN
=head1 SYNOPSIS
use File::Dropbox;
use Fcntl;
# Application credentials
my %app = (
oauth2 => 1,
access_token => $access_token,
);
view all matches for this distribution
view release on metacpan or search on metacpan
lib/File/KDBX/Key.pm view on Meta::CPAN
version 0.906
=head1 DESCRIPTION
A master key is one or more credentials that can protect a KDBX database. When you encrypt a database with
a master key, you will need the master key to decrypt it. B<Keep your master key safe!> If someone gains
access to your master key, they can open your database. If you forget or lose any part of your master key, all
data in the database is lost.
There are several different types of keys, each implemented as a subclass:
view all matches for this distribution
view release on metacpan or search on metacpan
lib/File/RsyncP.pm view on Meta::CPAN
returns undef.
=item serverService(module, authUser, authPasswd, authRequired)
Specify which module to use (a "module" is the symbolic name that
appears inside "[...]" /etc/rsyncd.conf), the user's credentials
(authUser and authPasswd) and whether authorization is mandatory
(authRequired). If set to a non-zero value, authRequired ensures
that the remote Rsync daemon requires authentication. If necessary,
this is to ensure that you don't connect to an insecure Rsync daemon.
The auth arguments are optional if the selected rsyncd module doesn't
view all matches for this distribution
view release on metacpan or search on metacpan
t/04-interop.t view on Meta::CPAN
###############################################################################
# Test 4: sops encrypt -> Perl decrypt (JSON)
###############################################################################
subtest 'sops encrypt -> Perl decrypt (JSON)' => sub {
my $data = {
credentials => {
username => 'admin',
password => 's3cr3t!',
},
};
view all matches for this distribution
view release on metacpan or search on metacpan
lib/Finance/Alpaca/DataStream.pm view on Meta::CPAN
=item C<402>
{ T => 'error', code => 402, msg => 'auth failed' }
You have provided invalid authentication credentials.
=item C<403>
{ T => 'error', code => 403, msg => 'already authenticated' }
view all matches for this distribution
view release on metacpan or search on metacpan
lib/Finance/Bank/Bankwest/Error/NotLoggedIn/SubsequentLogin.pm view on Meta::CPAN
=head1 DESCRIPTION
This exception may be thrown on calls to various methods of
L<Finance::Bank::Bankwest::Session> when the Bankwest Online Banking
session has been terminated due to another session being established
with the same credentials.
=head1 SEE ALSO
view all matches for this distribution
view release on metacpan or search on metacpan
lib/Finance/Bank/Cahoot.pm view on Meta::CPAN
sub new
{
my ($class, %opts) = @_;
croak 'Must provide a credentials handler' if not exists $opts{credentials};
my $self = { _mech => new WWW::Mechanize(autocheck => 1),
_credentials => $opts{credentials},
_connected => 0,
};
$self->{_mech}->agent_alias('Mac Safari');
bless $self, $class;
$self->_set_credentials(%opts);
return $self;
}
sub _set_credentials
{
my ($self, %opts) = @_;
croak 'Must provide either a premade credentials object or a class name together with options'
if not exists $opts{credentials};
if (ref $opts{credentials}) {
croak 'Not a valid credentials object'
if not $self->_isa_credentials($opts{credentials});
croak 'Can\'t accept credential options if supplying a premade credentials object'
if exists $opts{credentials_options};
$self->{_credentials} = $opts{credentials};
} else {
croak 'Must provide credential options unless suppying a premade credentials object'
if not exists $opts{credentials_options};
$self->{_credentials} =
$self->_new_credentials($opts{credentials}, $opts{credentials_options});
}
return $self;
}
sub _new_credentials
{
my ($self, $class, $options) = @_;
croak 'Invalid class name'
if $class !~ /^(?:\w|::)+$/;
my $full_class = 'Finance::Bank::Cahoot::CredentialsProvider::'.$class;
eval "local \$SIG{'__DIE__'}; local \$SIG{'__WARN__'}; require $full_class;"; ## no critic
croak 'Not a valid credentials class - not found' if $EVAL_ERROR;
my $credentials;
{
local $Carp::CarpLevel = $Carp::CarpLevel + 1; ## no critic
$credentials = $full_class->new(credentials => [@REQUIRED_SUBS],
options => $options);
}
croak 'Not a valid credentials class - incomplete' if not $self->_isa_credentials($credentials);
return $credentials;
}
sub _isa_credentials
{
my ($self, $credentials) = @_;
foreach my $sub (@REQUIRED_SUBS) {
return unless defined eval {
local $SIG{'__DIE__'}; ## no critic
local $SIG{'__WARN__'}; ## no critic
$credentials->can($sub);
};
}
return 1;
}
lib/Finance/Bank/Cahoot.pm view on Meta::CPAN
my ($self) = @_;
return if $self->{_connected};
$self->_get('https://securebank.cahoot.com/AquariusSecurity/bks/web/en/core_banking/log_in/frameset_top_log_in.jsp');
my %fields = (inputuserid => $self->{_credentials}->username());
my $content = $self->{_mech}->content;
foreach my $input ($self->{_mech}->find_all_inputs()) {
my $name = $input->name();
next if not defined $name;
next if defined $fields{$name};
$fields{$name} = $self->{_credentials}->place() if $content =~ /address or place:/i;
$fields{$name} = $self->{_credentials}->date() if $content =~ /memorable year:/i;
$fields{$name} = $self->{_credentials}->maiden() if $content =~ /maiden name:/i;
}
$self->_submit_form(fields => \%fields);
my %chars;
my $label;
lib/Finance/Bank/Cahoot.pm view on Meta::CPAN
{
# We submit a form, modifying hidden fields - WWW::Mechanize does not like
# this (see FAQ).
local $^W = 0; ## no critic
$self->_submit_form(fields => { passwordChar1Hidden => $self->{_credentials}->password($chars{1}),
passwordChar2Hidden => $self->{_credentials}->password($chars{2}),
passwordChar1 => q{*},
passwordChar2 => q{*} });
}
$self->{_connected} = 1;
return $self;
lib/Finance/Bank/Cahoot.pm view on Meta::CPAN
either C<Crypt::SSLeay> or C<IO::Socket::SSL> installed for HTTPS
support to work with WWW::Mechanize.
=head1 SYNOPSIS
my $cahoot = Finance::Bank::Cahoot->new(credentials => 'Constant',
credentials_options => {
account => '12345678',
password => 'verysecret',
place => 'London',
date => '01/01/1906',
username => 'dummy',
lib/Finance/Bank/Cahoot.pm view on Meta::CPAN
=item B<new>
Create a new instance of a connection to the Cahoot server.
C<new> can be called in two different ways. It can take a single parameter,
C<credentials>, which will accept an already created credentials object, of type
C<Finance::Bank::Cahoot::CredentialsProvider::*>. Alternatively, it can take two
parameters, C<credentials> and C<credentials_options>. In this case
C<credentials> is the name of a credentials class to create an instance of, and
C<credentials_options> is a hash of the options to pass-through to the
constructor of the chosen class.
If the second form of C<new> is being used, and the chosen class is I<not> one
of the ones supplied as standard then it will need to be C<required> first.
If any errors occur then C<new> will C<croak>.
my $cahoot = Finance::Bank::Cahoot->new(credentials => 'Constant',
credentials_options => {
account => '12345678',
password => 'verysecret',
place => 'London',
date => '01/01/1906',
username => 'dummy',
maiden => 'Smith' } );
# Or create the credentials object ourselves
my $credentials = Finance::Bank::Cahoot::CredentialsProvider::Constant->new(
account => '12345678', password => 'verysecret', place => 'London',
date => '01/01/1906', username => 'dummy', maiden => 'Smith' } );
my $cahoot = Finance::Bank::Cahoot->new(credentials => $credentials);
=item B<login>
Login to the Cahoot server using the credentials supplied to C<new>. This method
is implicit for all data access methods, so typically does not need to be called
explicitly. The method takes no arguments and will only call one of memorable
place, date or mother's maiden name as expected by the Cahoot portal.
=item B<accounts>
Returns a list reference containing a summary of any accounts available from
the supplied credentials. If a login has yet to occur C<accounts> will
automatically do this.
my $accounts = $cahoot->accounts;
Each item in the list is a hash reference that holds summary information for a
view all matches for this distribution
view release on metacpan or search on metacpan
CreateCard.pm view on Meta::CPAN
$self->{password} = $password;
}
sub get_basic_credentials {
my($self, $realm, $uri) = @_;
my $netloc = $uri->host_port;
view all matches for this distribution
view release on metacpan or search on metacpan
DeutscheBank.pm view on Meta::CPAN
=back
=head2 login()
Closes the current session and logs in to the website using
the credentials given at construction time.
=head2 close_session()
Closes the session and invalidates it on the server.
view all matches for this distribution
view release on metacpan or search on metacpan
t/methods/live/login.t view on Meta::CPAN
my $account = Finance::Bank::DE::NetBank->new(%config);
ok( defined($account->login()), 'login with offical demo login works');
$account->CUSTOMER_ID("broken");
ok( !defined($account->login()), 'broken credentials must not work' );
ok( !defined($account->statement()), 'statement() must not work with broken credentials' );
ok( !defined($account->saldo()), 'saldo() must not work with broken credentials' );
view all matches for this distribution
view release on metacpan or search on metacpan
lib/Finance/Bank/IE/BankOfIreland.pm view on Meta::CPAN
}
=item * $self->_set_creds_fields( $config )
Parse the last received page for credentials entry fields, and populate them with the data from C<$config>. Also injects the missing 'form:continue' hidden field.
=cut
sub _set_creds_fields {
my $self = shift;
my $confref = shift;
view all matches for this distribution
view release on metacpan or search on metacpan
lib/Finance/Bank/Natwest.pm view on Meta::CPAN
either C<Crypt::SSLeay> or C<IO::Socket::SSL> installed for HTTPS
support to work with LWP.
=head1 SYNOPSIS
my $nw = Finance::Bank::Natwest->new( credentials => 'Constant',
credentials_options => {
dob => '010179',
uid => '0001',
password => 'Password',
pin => '4321' } );
lib/Finance/Bank/Natwest.pm view on Meta::CPAN
=over 4
=item B<new>
my $nw = Finance::Bank::Natwest->new( credentials => 'Constant',
credentials_options => {
dob => '010179',
uid => '0001',
password => 'Password',
pin => '4321' }
);
# Or create the credentials object ourselves
my $credentials = Finance::Bank::Natwest::CredentialsProvider::Constant->new(
dob => '010179', uid => '0001', password => 'Password', pin => '4321' );
my $nw = Finance::Bank::Natwest->new( credentials => $credentials );
C<new> can be called in two different ways. It can take a single parameter,
C<credentials>, which will accept an already created credentials object, of type
C<Finance::Bank::Natwest::CredentialsProvider::*>. Alternatively, it can take two
parameters, C<credentials> and C<credentials_options>. In this case
C<credentials> is the name of a credentials class to create an instance of, and
C<credentials_options> is a hash of the options to pass-through to the
constructor of the chosen class.
If the second form of C<new> is being used, and the chosen class is I<not> one
of the ones supplied as standard then it will need to be C<required> first.
lib/Finance/Bank/Natwest.pm view on Meta::CPAN
# Or get a list ref instead
my $accounts = $nw->accounts;
Returns a list containing a summary of any accounts available from the
supplied credentials. Each item in the list is a hash reference that holds
summary information for a single account, and contains this data:
=over 4
=item B<name> - the name of the account
view all matches for this distribution
view release on metacpan or search on metacpan
lib/Finance/Bank/Postbank_de.pm view on Meta::CPAN
=back
=head2 $account->new_session
Closes the current session and logs in to the website using
the credentials given at construction time.
=head2 $account->close_session
Closes the session and invalidates it on the server.
view all matches for this distribution
view release on metacpan or search on metacpan
lib/Finance/BankVal/UK.pm view on Meta::CPAN
}
}
sub loadContent {
$json =
"{'credentials':{'uname':'$uid','pin':'$pin'},'account':{'account':'$account','sortcode':'$sortcode'}}";
}
#sub to format the error message in the correct expected format with all nodes etc
sub formatErrorMsg {
if ( substr( $responseString, 0, 7 ) eq 'INVALID' ) {
view all matches for this distribution
view release on metacpan or search on metacpan
IPN.pm is not tested and likely doesnt fully work.
- find a way to test this.
Setup a test webserver so it can send fake BitPay responses when requested.
- this allows the class methods to be tested without the need for BitPay merchant credentials.
view all matches for this distribution
view release on metacpan or search on metacpan
bin/coinbasepro.pl view on Meta::CPAN
secret => $config->{coinbasepro}{api_secret} || $ENV{GDAX_API_SECRET} || "",
passphrase => $config->{coinbasepro}{api_passphrase} || $ENV{GDAX_API_PASSPHRASE} || "",
debug => 0
);
if ( !$creds[0] || !$creds[1] || !$creds[2] ) {
warn "$prog: no credentials in " . join(", ", get_possible_config_filenames()) . " or env vars GDAX_API_(KEY|SECRET|PASSPHRASE)\n";
}
$SIG{__DIE__} = \&Carp::confess;
$SIG{__WARN__} = \&Carp::confess;
view all matches for this distribution