From 597272ba275406e6ae8e02af1065637eee53c32d Mon Sep 17 00:00:00 2001 From: Teddy Wing Date: Fri, 15 Dec 2017 00:15:34 +0100 Subject: Make `$VERSION` and `%IRSSI` `our` variables Learned about the Perl `our` keyword from https://github.com/shabble/irssi-docs/wiki/Guide#preamble which recommends using it. This allows us to eliminate the `use vars` line. Neat. --- vimput.pl | 5 ++--- 1 file changed, 2 insertions(+), 3 deletions(-) diff --git a/vimput.pl b/vimput.pl index fc50740..971616c 100644 --- a/vimput.pl +++ b/vimput.pl @@ -1,10 +1,9 @@ use strict; -use vars qw($VERSION %IRSSI); use Irssi; -$VERSION = '1.0'; -%IRSSI = { +our $VERSION = '1.00'; +our %IRSSI = { authors => 'Teddy Wing', contact => 'irssi@teddywing.com', name => 'Vimput', -- cgit v1.2.3