---
name: "SVN::SVNLook"
section: "3pm"
platform: "linux"
package: "libsvn-svnlook-perl"
version: "0.04-4"
release: "Debian 13 (Trixie)"
platforms: ["linux"]
url: "https://new.carta.tech/SVN::SVNLook"
---

# SVN::SVNLook(3pm)

Perl wrapper to the svnlook command.

## NAME

SVN::SVNLook - Perl wrapper to the svnlook command.

## SYNOPSIS

```
  use SVN::SVNLook;
  my $revision = 1;
  my $svnlook = SVN::SVNLook->new(repo => 'repo url',
                                   cmd => 'path to svn look');
  my ($author,$date,$logmessage) = $svnlook->info(revision => $revision);
  print "Author $author\n";
  print "Date $date\n";
  print "LogMessage $logmessage\n";
```

## DESCRIPTION

SVN::SVNLook runs the command line client. This module was created to make adding hooks script easier to manipulate.

## METHODs

### youngest

```
  youngest ();
```

Perform the youngest command on the repository. Returns the revision number of the most recent revision as a scalar.

### info

```
  info (revision=>$revision);
```

Perform the info command, for a given revision or transaction using named parameters, or a single parameter will be assumed to mean revision for backwards compatibility. The information returned is an array containing author, date, and log message. If no `$revision` is specified, info for the youngest revision is returned.

### author

```
  author (revision=>$revision);
```

Perform the author command, for a given revision or transaction using named parameters or a single parameter will be assumed to mean revision for backwards compatibility. The information returned is the author message. If no `$revision` or transaction is specified, author for the youngest revision is returned.

### dirschanged

```
  dirschanged (revision=>$revision)
```

Performs the dirs-changed command, for a given revision or transaction using named parameters, or a single parameter will be assumed to mean revision for backwards compatibility. This method returns a boolean and an array reference.

### fileschanged

```
  fileschanged (revision=>$revision)
```

Performs the changed command, for a given revision or transaction using named parameters or a single parameter will be assumed to mean revision for backwards compatibility this method returns 3 array references added, deleted and modified.

### diff

```
  diff (revision=>$revision)
```

Performs the diff command, for a given revision or transaction using named parameters or a single parameter will be assumed to mean revision for backwards compatibility this method returns a hash reference, with each file being the key and value being the diff info.

## AUTHOR

Salvatore E ScottoDiLuzio, \<sal.scotto@gmail.com\> Contributions by Kevin Semande

## COPYRIGHT

Copyright 2005 Salvatore E. ScottoDiLuzio.  All Rights Reserved.

This program is free software; you can redistribute it and/or modify it under the same terms as Perl itself.