Apache-SecSess
16 results

 view release on metacpan or  search on metacpan

demo/ht/adam.acme.com/signout/timeout.html  view on Meta::CPAN 

	'<b>Idle Timeout:</b> your session remained inactive for too long.',
	expire => 
	'<b>Expiration:</b> your session has expired.',
	notvalid => 
	'<b>No Longer Valid:</b> your session credentials are no longer valid.',
	unknown => 
	'<b>Unknown Reason.</b>'
);

my $content = <<"ENDCONTENT";
<font color="#f42424" size=5>Session Timeout.</font><p>
Your login session has timed out due to the following reason:
<ul>
	<li> $messages{$type}
</ul>
Please log in again.
ENDCONTENT

</%init>

<%args>

demo/ht/header.comp  view on Meta::CPAN 

	if (form) form.elements[0].focus();
}
//   -->
</script>
<style type="text/css">
	BODY { background: #d1cfdf url(/images/bg.gif) top left repeat-y; }
	#hrule { background: #d1cfdf url(/images/hrule.gif) repeat-x; }
	#dochead {
		text-width: 70%;
		vertical-align: center;
		font-family: Ariel, Helvetica;
		font-size: 18pt;
		font-weight: bold;
	}
	#logo {
		text-align: right;
		vertical-align: top;
	}
	#menu-head {
		vertical-align: top;
		background-color: #4c0505;
		color: #f0f0f0;
		font-family: Ariel, Helvetica;
		font-size: 14pt;
		font-weight: bold;
	}
	#menu-item {
		background-color: #e8e8ab;
		color: #000000;
		font-family: Ariel, Helvetica;
		font-size: 12pt;
		font-weight: normal;
	}
</style>
</head>

<!--
  +-+-------------+
  |s| head   logo |
  |i| --- hr ---  |
  |d| cont   menu |
  |e|  -ent       |

demo/ht/john.sec.acme.com/authen/index.html  view on Meta::CPAN 

	action => $action,
	inputs => $inputs,
	message => "$welcome<p>\n$message{$msg}",
	submit => 'Login'
&>

<%init>
my $welcome = "Welcome, user '$uid'.";
my $pta = 'Please try again.';
my $sorry = 'Please contact the system administrator.';
my $err = '<font color="red" size=5>An Error Occurred.</font><p>';
my $noerr = '<font color="#000000" size=5>Logging in.</font><p>';
my %message = (
	empty => "$err One or more required fields contained no data.  $pta",
	unknown => "$err Unknown user.  $pta",
	again => "$err The supplied PIN code was incorrect.  $pta",
	disabled => "$err Your account has been temporarily disabled. $sorry"
);
my $inputs = [
	{name => 'pin', prompt => 'Your PIN Code:', type => 'password'}
];
my $action = "https://john.sec.acme.com/authen?url=$url";

demo/ht/john.sec.acme.com/changeid/index.html  view on Meta::CPAN 

	title => 'Change User ID', 
	action => $action,
	inputs => $inputs,
	message => "$message{$msg}",
	submit => 'Login'
&>

<%init>
my $pta = 'Please try again.';
my $sorry = 'Please contact the system administrator.';
my $err = '<font color="red" size=5>An Error Occurred.</font><p>';
my $noerr = '<font color="#000000" size=5>Logging in.</font><p>';
my %message = (
	empty => "$err One or more required fields contained no data.  $pta",
	unknown => "$err Unknown user.  $pta",
	again => "$err The supplied password was incorrect.  $pta",
	disabled => "$err The account has been temporarily disabled. $sorry"
);
my $action = 'https://john.sec.acme.com/changeid';
my $inputs = [
	{name => 'newuid', prompt => 'Desired User ID:', type => 'text'},
	{name => 'pw', prompt => 'Your Password:', type => 'password'}

demo/ht/john.sec.acme.com/signout/timeout.html  view on Meta::CPAN 

	'<b>Idle Timeout:</b> your session remained inactive for too long.',
	expire => 
	'<b>Expiration:</b> your session has expired.',
	notvalid => 
	'<b>No Longer Valid:</b> your session credentials are no longer valid.',
	unknown => 
	'<b>Unknown Reason.</b>'
);

my $content = <<"ENDCONTENT";
<font color="#f42424" size=5>Session Timeout.</font><p>
Your login session has timed out due to the following reason:
<ul>
	<li> $messages{$type}
</ul>
Please log in again.
ENDCONTENT

</%init>

<%args>

demo/ht/lysander.acme.com/authen/index.html  view on Meta::CPAN 

	title => 'Login', 
	action => $action,
	inputs => $inputs,
	message => $message{$msg},
	submit => 'Login'
&>

<%init>
my $pta = 'Please try again.';
my $sorry = 'Please contact the system administrator.';
my $err = '<font color="red" size=5>An Error Occurred.</font><p>';
my $noerr = '<font color="#000000" size=5>Logging in.</font><p>';
my %message = (
	empty => "$err One or more required fields contained no data.  $pta",
	unknown => "$err Unknown user.  $pta",
	again => "$err The supplied password was incorrect.  $pta",
	disabled => "$err Your account has been temporarily disabled. $sorry"
);
my $inputs = [
	{name => 'uid', prompt => 'Your Login ID:', type => 'text'},
	{name => 'pw', prompt => 'Your Password:', type => 'password'}
];

demo/ht/lysander.acme.com/signout/timeout.html  view on Meta::CPAN 

	'<b>Idle Timeout:</b> your session remained inactive for too long.',
	expire => 
	'<b>Expiration:</b> your session has expired.',
	notvalid => 
	'<b>No Longer Valid:</b> your session credentials are no longer valid.',
	unknown => 
	'<b>Unknown Reason.</b>'
);

my $content = <<"ENDCONTENT";
<font color="#f42424" size=5>Session Timeout.</font><p>
Your login session has timed out due to the following reason:
<ul>
	<li> $messages{$type}
</ul>
Please log in again.
ENDCONTENT

</%init>

<%args>

demo/ht/milt.sec.acme.com/changeid/index.html  view on Meta::CPAN 

	title => 'Change User ID', 
	action => $action,
	inputs => $inputs,
	message => "$message{$msg}",
	submit => 'Login'
&>

<%init>
my $pta = 'Please try again.';
my $sorry = 'Please contact the system administrator.';
my $err = '<font color="red" size=5>An Error Occurred.</font><p>';
my $noerr = '<font color="#000000" size=5>Logging in.</font><p>';
my %message = (
	empty => "$err One or more required fields contained no data.  $pta",
	unknown => "$err Unknown user.  $pta",
	again => "$err The supplied password was incorrect.  $pta",
	disabled => "$err The account has been temporarily disabled. $sorry"
);
my $action = 'https://john.sec.acme.com/changeid';
my $inputs = [
	{name => 'newuid', prompt => 'Desired User ID:', type => 'text'},
	{name => 'pw', prompt => 'Your Password:', type => 'password'}

demo/ht/milt.sec.acme.com/signout/timeout.html  view on Meta::CPAN 

	'<b>Idle Timeout:</b> your session remained inactive for too long.',
	expire => 
	'<b>Expiration:</b> your session has expired.',
	notvalid => 
	'<b>No Longer Valid:</b> your session credentials are no longer valid.',
	unknown => 
	'<b>Unknown Reason.</b>'
);

my $content = <<"ENDCONTENT";
<font color="#f42424" size=5>Session Timeout.</font><p>
Your login session has timed out due to the following reason:
<ul>
	<li> $messages{$type}
</ul>
Please log in again.
ENDCONTENT

</%init>

<%args>

demo/ht/noam.acme.org/changeid/index.html  view on Meta::CPAN 

	title => 'Change User ID', 
	action => $action,
	inputs => $inputs,
	message => "$message{$msg}",
	submit => 'Login'
&>

<%init>
my $pta = 'Please try again.';
my $sorry = 'Please contact the system administrator.';
my $err = '<font color="red" size=5>An Error Occurred.</font><p>';
my $noerr = '<font color="#000000" size=5>Logging in.</font><p>';
my %message = (
	empty => "$err One or more required fields contained no data.  $pta",
	unknown => "$err Unknown user.  $pta",
	again => "$err The supplied password was incorrect.  $pta",
	disabled => "$err The account has been temporarily disabled. $sorry"
);
my $action = 'https://john.sec.acme.com/changeid';
my $inputs = [
	{name => 'newuid', prompt => 'Desired User ID:', type => 'text'},
	{name => 'pw', prompt => 'Your Password:', type => 'password'}

demo/ht/noam.acme.org/signout/timeout.html  view on Meta::CPAN 

	'<b>Idle Timeout:</b> your session remained inactive for too long.',
	expire => 
	'<b>Expiration:</b> your session has expired.',
	notvalid => 
	'<b>No Longer Valid:</b> your session credentials are no longer valid.',
	unknown => 
	'<b>Unknown Reason.</b>'
);

my $content = <<"ENDCONTENT";
<font color="#f42424" size=5>Session Timeout.</font><p>
Your login session has timed out due to the following reason:
<ul>
	<li> $messages{$type}
</ul>
Please log in again.
ENDCONTENT

</%init>

<%args>

demo/ht/stu.transacme.com/authen/index.html  view on Meta::CPAN 

	action => $action,
	inputs => $inputs,
	message => "$welcome<p>\n$message{$msg}",
	submit => 'Login'
&>

<%init>
my $welcome = "Welcome, user '$uid'.";
my $pta = 'Please try again.';
my $sorry = 'Please contact the system administrator.';
my $err = '<font color="red" size=5>An Error Occurred.</font><p>';
my $noerr = '<font color="#000000" size=5>Logging in.</font><p>';
my %message = (
	empty => "$err One or more required fields contained no data.  $pta",
	unknown => "$err Unknown user.  $pta",
	again => "$err The supplied PIN code was incorrect.  $pta",
	disabled => "$err Your account has been temporarily disabled. $sorry"
);
my $inputs = [
	{name => 'pin', prompt => 'Your PIN Code:', type => 'password'}
];
my $action = "https://stu.transacme.com/authen?url=$url";

demo/ht/stu.transacme.com/changeid/index.html  view on Meta::CPAN 

	title => 'Change User ID', 
	action => $action,
	inputs => $inputs,
	message => "$message{$msg}",
	submit => 'Login'
&>

<%init>
my $pta = 'Please try again.';
my $sorry = 'Please contact the system administrator.';
my $err = '<font color="red" size=5>An Error Occurred.</font><p>';
my $noerr = '<font color="#000000" size=5>Logging in.</font><p>';
my %message = (
	empty => "$err One or more required fields contained no data.  $pta",
	unknown => "$err Unknown user.  $pta",
	again => "$err The supplied password was incorrect.  $pta",
	disabled => "$err The account has been temporarily disabled. $sorry"
);
my $action = 'https://john.sec.acme.com/changeid';
my $inputs = [
	{name => 'newuid', prompt => 'Desired User ID:', type => 'text'},
	{name => 'pw', prompt => 'Your Password:', type => 'password'}

demo/ht/stu.transacme.com/signout/timeout.html  view on Meta::CPAN 

	'<b>Idle Timeout:</b> your session remained inactive for too long.',
	expire => 
	'<b>Expiration:</b> your session has expired.',
	notvalid => 
	'<b>No Longer Valid:</b> your session credentials are no longer valid.',
	unknown => 
	'<b>Unknown Reason.</b>'
);

my $content = <<"ENDCONTENT";
<font color="#f42424" size=5>Session Timeout.</font><p>
Your login session has timed out due to the following reason:
<ul>
	<li> $messages{$type}
</ul>
Please log in again.
ENDCONTENT

</%init>

<%args>

demo/ht/tom.acme.com/changeid/index.html  view on Meta::CPAN 

	title => 'Change User ID', 
	action => $action,
	inputs => $inputs,
	message => $message{$msg},
	submit => 'Login'
&>

<%init>
my $pta = 'Please try again.';
my $sorry = 'Please contact the system administrator.';
my $err = '<font color="red" size=5>An Error Occurred.</font><p>';
my $noerr = '<font color="#000000" size=5>Logging in.</font><p>';
my %message = (
	empty => "$err One or more required fields contained no data.  $pta",
	unknown => "$err Unknown user.  $pta",
	again => "$err The supplied password was incorrect.  $pta",
	disabled => "$err The account has been temporarily disabled. $sorry"
);
my $action = 'https://tom.acme.com/changeid';
my $inputs = [
	{name => 'newuid', prompt => 'Desired User ID:', type => 'text'},
	{name => 'pw', prompt => 'Your Password:', type => 'password'}

demo/ht/tom.acme.com/signout/timeout.html  view on Meta::CPAN 

	'<b>Idle Timeout:</b> your session remained inactive for too long.',
	expire => 
	'<b>Expiration:</b> your session has expired.',
	notvalid => 
	'<b>No Longer Valid:</b> your session credentials are no longer valid.',
	unknown => 
	'<b>Unknown Reason.</b>'
);

my $content = <<"ENDCONTENT";
<font color="#f42424" size=5>Session Timeout.</font><p>
Your login session has timed out due to the following reason:
<ul>
	<li> $messages{$type}
</ul>
Please log in again.
ENDCONTENT

</%init>

<%args>



( run in 1.785 second using v1.01-cache-2.11-cpan-5735350b133 )