PPI::Statement::When(3) User Contributed Perl Documentation PPI::Statement::When(3)

# [NAME](#NAME)

PPI::Statement::When - A when statement

# [SYNOPSIS](#SYNOPSIS)

```
  foreach ( qw/ foo bar baz / ) {
      when ( m/b/ ) {
          boing($_);
      }
      when ( m/f/ ) {
          boom($_);
      }
      default {
          tchak($_);
      }
  }
```

# [INHERITANCE](#INHERITANCE)

```
  PPI::Statement::When
  isa PPI::Statement
      isa PPI::Node
          isa PPI::Element
```

# [DESCRIPTION](#DESCRIPTION)

"PPI::Statement::When" objects are used to describe when and default statements, as described in perlsyn.

# [METHODS](#METHODS)

"PPI::Structure::When" has no methods beyond those provided by the standard PPI::Structure, PPI::Node and PPI::Element methods.

# [TO DO](#TO_DO)

\- Write unit tests for this package

# [SUPPORT](#SUPPORT)

See the support section in the main module.

# [AUTHOR](#AUTHOR)

Adam Kennedy <adamk@cpan.org>

# [COPYRIGHT](#COPYRIGHT)

Copyright 2001 - 2011 Adam Kennedy.

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

The full text of the license can be found in the LICENSE file included with this module.

2026-10-25 perl v5.44.0

---

Document: PPI::Statement::When(3pm) from perl-ppi 1.291-r2 (Chainguard OS)
Source: https://github.com/Perl-Critic/PPI