™..                             Mail::DKIM::SignerPolicy - Online Linux Manual Page
Section : 3
Updated : 2009-07-10
Source : perl v5.10.1
Note : User Contributed Perl Documentation
     
NAMEMail::DKIM::SignerPolicy − determines signing parameters for a message 
DESCRIPTIONA ‟signer policy” is an object, class, or function used by Mail::DKIM::Signer to determine what signatures to add to the current message. To take advantage of signer policies, create your own Perl class that extends the Mail::DKIM::SignerPolicy class. The only method you need to implement is the apply() method. The apply() method takes as a parameter the Mail::DKIM::Signer object. Using this object, it can determine some properties of the message (e.g. what the From: address or Sender: address is). Then it sets various signer properties as desired. The apply() method should return a nonzero value if the message should be signed. If a false value is returned, then the message is ‟skipped” (i.e. not signed). Here is an example of a policy that always returns the same values:   package MySignerPolicy;
  use base "Mail::DKIM::SignerPolicy";
  sub apply
  {
      my $self = shift;
      my $signer = shift;
  
      $signer−>algorithm("rsa−sha1");
      $signer−>method("relaxed");
      $signer−>domain("example.org");
      $signer−>selector("selector1");
      $signer−>key_file("private.key");
  
      return 1;
  }
To use this policy, simply specify the name of the class as the Policy parameter...   my $dkim = Mail::DKIM::Signer−>new(
                  Policy => "MySignerPolicy",
             );
ADVANCEDYou can also have the policy actually build the signature for the Signer to use. To do this, call the signer's add_signature() method from within your apply() callback. E.g.,   sub apply
  {
      my $self = shift;
      my $signer = shift;
  
      $signer−>add_signature(
              new Mail::DKIM::Signature(
                  Algorithm => $signer−>algorithm,
                  Method => $signer−>method,
                  Headers => $signer−>headers,
                  Domain => $signer−>domain,
                  Selector => $signer−>selector,
              ));
      return;
  }
Again, if you do not want any signatures, return zero or undef. If you use add_signature() to create a signature, the default signature will not be created, even if you return nonzero. 
AUTHORJason Long, <jlong@messiah.edu> 
COPYRIGHT AND LICENSECopyright (C) 2006−2007 by Messiah College This library is free software; you can redistribute it and/or modify it under the same terms as Perl itself, either Perl version 5.8.6 or, at your option, any later version of Perl 5 you may have available.  0  
   Johanes Gumabo   
 Data Size    :    8,513 byte 
man-Mail::DKIM::SignerPolicy.3pmBuild    :     2025-03-22, 13:26     :     
Visitor Screen    :      x   
Visitor Counter  (  page  /  site  )     :     50  /  4,060,057  
Visitor ID    :        :     
Visitor IP    :     216.73.216.159     :     
Visitor Provider    :     AMAZON-02     :     
Provider Position  (  lat  x  lon  )     :     39.962500   x   -83.006100     :      x   
Provider Accuracy Radius  (  km  )     :     20     :     
Provider City    :     Columbus     :     
Provider Province    :     Ohio  ,     :     ,  
Provider Country    :     United States     :     
Provider Continent    :     North America     :     
Visitor Recorder    :    Version    :     
Visitor Recorder    :    Library    :     
Online Linux Manual Page    :    Version    :     Online Linux Manual Page - Fedora.40 - march=x86-64 - mtune=generic - 25.03.22  
Online Linux Manual Page    :    Library    :     lib_c - 24.10.03 - march=x86-64 - mtune=generic - Fedora.40  
Online Linux Manual Page    :    Library    :     lib_m - 24.10.03 - march=x86-64 - mtune=generic - Fedora.40  
Data Base    :    Version    :     Online Linux Manual Page Database - 24.04.13 - march=x86-64 - mtune=generic - fedora-38  
Data Base    :    Library    :     lib_c - 23.02.07 - march=x86-64 - mtune=generic - fedora.36  
  
 
    
  If error, please print screen and send to johanes_gumabo@yahoo.co.id
 Under development. Support me via PayPal.  
 ERROR : Need New Coding :          (parse_manual_page_|254|Mail::DKIM::SignerPolicy.3pm|36/37|el══─{─══.|.el══─{─══.    ds -- \|\(em\|
)          (htmlprn|160|Mail::DKIM::SignerPolicy.3pm|36/37|.el══─{─══.    ds --  —  |.el══─{─══.    ds -- \|\(em\|
)          (parse_manual_page_|254|Mail::DKIM::SignerPolicy.3pm|41|br══─}─══|'br══─}─══
)          (htmlprn|160|Mail::DKIM::SignerPolicy.3pm|41|'br══─}─══ |'br══─}─══
)          (rof_nr_x|149|Mail::DKIM::SignerPolicy.3pm|51/52|\nF|.ie \nF ══─{─══.    de IX
)          (rof_unit_scale_px|41|Mail::DKIM::SignerPolicy.3pm|51/52|F|.ie \nF ══─{─══.    de IX
)          (rof_if|19|Mail::DKIM::SignerPolicy.3pm|51/52|\nF|.ie \nF ══─{─══.    de IX
)          (htmlprn|160|Mail::DKIM::SignerPolicy.3pm|51/52|.ie \nF ══─{─══.    de IX|.ie \nF ══─{─══.    de IX
)          (rof_escape_sequence|93|Mail::DKIM::SignerPolicy.3pm|53|\$1\t\\n%\t"\\$2" |.    tm Index:\\$1\t\\n%\t"\\$2"
)          (parse_manual_page_|254|Mail::DKIM::SignerPolicy.3pm|57|══─}─══|.══─}─══
)          (htmlprn|160|Mail::DKIM::SignerPolicy.3pm|57|.══─}─══ |.══─}─══
)