SVN::SVNLook(3pm)

💖 SVN::SVNLook 💖

okay bestie, gather round, because this is the SVN::SVNLook page from the User Contributed Perl Documentation collection, and it's literally a Perl wrapper around the svnlook command line client. no cap. 🦋

---

✨ NAME ✨

SVN::SVNLook — a Perl wrapper to the svnlook command. that's it, that's the whole vibe. 💅

---

🌸 SYNOPSIS 🌸

here's the whole thing in action, copy it exactly bestie:

  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";

see how it just... works? iconic behavior honestly. 👑

---

🎀 DESCRIPTION 🎀

SVN::SVNLook runs the command line client. the whole reason this module exists is to make adding hooks script easier to manipulate. that's the origin story, that's the lore, periodt. ✨

---

💅 METHODs 💅

yes bestie, it's literally spelled "METHODs" in the original and i am NOT fixing it, that's just the canon. 💀

🧚 youngest

  youngest ();

perform the youngest command on the repository. returns the revision number of the most recent revision, as a scalar. so like, "what's the freshest thing in here" and it tells you. slay. 🌟

---

🍓 info

  info (revision=>$revision);

perform the info command, for a given revision or transaction using named parameters — or, for backwards compatibility, a single parameter will be assumed to mean revision. the information returned is an array containing author, date, and log message. and if you don't specify a $revision at all? you get info for the youngest revision. she's generous like that. 💖

---

🦋 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. and if no $revision or transaction is specified, you get author for the youngest revision. who wrote this?? let's find out. 🔍

---

🌈 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. two things!! a little combo meal. 🍟

---

🌸 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. three!! a trio!! the friend group of return values. 🫶

---

⭐ 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. so you get a lil dictionary of "this file ➡️ this diff". obsessed. 🔥

---

👑 AUTHOR 👑

Salvatore E ScottoDiLuzio, <sal.scotto@gmail.com>

contributions by Kevin Semande — we love a collab, we love a guest feature, we love community. 💜

---

💜 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. so like, go off, remix it, it's giving open source royalty. 🎀

---

🌟 and that's the whole page bestie!! this one's from perl v5.34.0, dated 2022-06-17, and it lives in the User Contributed Perl Documentation section (that's the 3pm vibe, iykyk). mwah, go write some hooks, you got this!! 💖✨🦋