SEI CERT Perl Coding Standard

Space shortcuts

Page tree

Versions Compared

Old Version 4

changes.mady.by.user David Svoboda

Saved on

compared with

New Version 5

changes.mady.by.user David Svoboda

Saved on

Key

  • This line was added.
  • This line was removed.
  • Formatting was changed.
Comment: s/die/croak/g;

...

Code Block
bgColor#ccccff
my $source;
open(SOURCE, "<", $source) or diecroak "error opening $source: $!";
@lines = (<SOURCE>);
close(SOURCE) or diecroak "error closing $source: $!";

If any error occurs, the program calls the diecroak() function, passing it a string that includes both the source file being opened, and the $! variable, which contains a system error string based on the value of errno, which is set to a useful value when the open(2) or close(2) functions fail.

...