comparison Lib/IMPL/Web/Application/Action.pm @ 320:28eba7e0c592

*web application action: added method to access HTTP request header.
author sergey
date Thu, 16 May 2013 17:16:41 +0400
parents 4abda21186cd
children 3dc9260017ad
comparison
equal deleted inserted replaced
319:d485467eca92 320:28eba7e0c592
27 27
28 sub cookie { 28 sub cookie {
29 my ($this,$name,$rx) = @_; 29 my ($this,$name,$rx) = @_;
30 30
31 $this->_launder(scalar( $this->query->cookie($name) ), $rx ); 31 $this->_launder(scalar( $this->query->cookie($name) ), $rx );
32 }
33
34 sub header {
35 my ($this,$header) = @_;
36
37 $this->query->https ? $this->query->https($header) : $this->query->http($header);
38 }
39
40 sub isSecure {
41 shift->query->https ? 1 : 0;
32 } 42 }
33 43
34 sub param { 44 sub param {
35 my ($this,$name,$rx) = @_; 45 my ($this,$name,$rx) = @_;
36 46