my $this_appcode = $AppCode{$ID};
$TotCst{ $this_appcode }
##</code><code>##

my $this_appcode = $AppCode{$ID};
my $this_csttype = $CstType{$ID};
$TotCst{$this_appcode}->{$this_csttype} += $InvAmnt{$ID};

##</code><code>##

$object->method(@arguments);
Class->method(@arguments);

##</code><code>##

# Here's an array...
my @array = ('foo', 'bar', 'baz');

# Set up a reference (pointer) to the array above.
my $array_ref = \@array;

# We can access an item in the array like this.
warn $array[2];

# But we want to access it via the reference (pointer)
# then we need the arrow:
warn $array_ref->[2];

##</code><code>##

$TotCst{$this_appcode}{$this_csttype} += $InvAmnt{$ID};