This file is indexed.

/usr/lib/perl5/SDLx/Music/Data.pm is in libsdl-perl 2.540-1.

This file is owned by root:root, with mode 0o644.

The actual contents of the file can be viewed below.

 1
 2
 3
 4
 5
 6
 7
 8
 9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
package SDLx::Music::Data;

sub volume
{
	$_[0]->{volume} = $_[1] if $_[1];
	return $_[0]; 
}

sub file
{
	if( $_[1] )
	{
		$_[0]->{file} = $_[1];
		$_[0]->{to_load} = 1; 
	}
	return $_[0]; 
}


sub fade_in
{
	$_[0]->{fade_in} = $_[1] if $_[1];
	return $_[0]; 
}

sub loops
{
	$_[0]->{loops} = $_[1] if $_[1];
	return $_[0]; 
}

1;