There is no difference between the two really. One is a language construct (our()) and the other is a pragma. They both declare package variables (as opposed to lexical variables, which are declared with my(), and don't touch packages) into the current package.

There is a difference between the scoping between use vars qw/ $var / and our $var - This is described in perldoc -f our and described by Sinister previously in this thread.

perl -e 's&&rob@cowsnet.com.au&&&split/[@.]/&&s&.com.&_&&&print'