---
name: "CGI::Application::Plugin::Authentication::Driver::Filter::sha1"
section: "3pm"
platform: "linux"
package: "libcgi-application-plugin-authentication-perl"
version: "0.25+~cs0.5-1"
release: "Debian 13 (Trixie)"
platforms: ["linux"]
url: "https://new.carta.tech/CGI::Application::Plugin::Authentication::Driver::Filter::sha1"
---

# CGI::Application::Plugin::Authentication::Driver::Filter::sha1(3pm)

SHA1 Password filter

## NAME

CGI::Application::Plugin::Authentication::Driver::Filter::sha1 - SHA1 Password filter

## METHODS

### filter ( (hex base64 binary), $string )

This will generate an SHA1 hash of the string in the requested format.  By default, hex encoding is used.

```
 my $filtered = $class->filter('base64', 'foobar'); # iEPX+SQWIR3p67lj/0zigSWTKHg
 -or-
 my $filtered = $class->filter(undef, 'foobar'); # 8843d7f92416211de9ebb963ff4ce28125932878
```

### check ( (hex base64 binary), $string, $sha1 )

This will generate an SHA1 hash of the string, and compare it against the provided SHA1 string. If no encoding type is specified, the length of the SHA1 string will be tested to see what format it is in.

```
 if ($class->check(undef, 'foobar', '8843d7f92416211de9ebb963ff4ce28125932878')) {
     # they match
 }
```

## SEE ALSO

CGI::Application::Plugin::Authentication::Driver, Digest::SHA, [**perl**(1)](/perl/1.md)

## AUTHOR

Cees Hek \<ceeshek@gmail.com\>

## LICENCE AND COPYRIGHT

Copyright (c) 2005, SiteSuite. All rights reserved.

This module is free software; you can redistribute it and/or modify it under the same terms as Perl itself.