#!/usr/bin/perl -w

use strict;

##</code><code>##

use warnings;  # rather than -w

##</code><code>##

system "netbackup/bin/admincmd/bpdbjobs -report -all_columns\n";

##</code><code>##

mail "xxxxxx@xxxxx.com

##</code><code>##

campari:~ [18:37:59]$ perldoc -f mail
No documentation for perl function `mail' found

##</code><code>##

mail "xxxxxx\@xxxxx.com";

##</code><code>##

mail 'xxxxxx@xxxxx.com';

##</code><code>##

Bareword "com" not allowed while "strict subs" in use at ./nb.pl line 7.<br>
Unquoted string "com" may clash with future reserved word at ./nb.pl line 7.<br>
Execution of ./nb.pl aborted due to compilation errors.
<br>
##</code><code>##

String found where operator expected at foo2.pl line 7, at end of line
        (Missing semicolon on previous line?)
Can't find string terminator '"' anywhere before EOF at foo2.pl line 7.