Text::Clip(3)

✨ Text::Clip(3) ✨

okay bestie, this is the Text::Clip page from the User Contributed Perl Documentation, and honestly? it's giving clipboard energy but make it text. 💖 let's get into it.

---

🎀 NAME 🎀

Text::Clip — clip and extract text in a clipboard-like way.

🌸 VERSION 🌸

version 0.0014 ✨ (yes, that's the one, no cap)

🦋 SYNOPSIS 🦋

so here's the whole vibe, bestie — watch the marks do their thing:

$data = <<_END_
# Xyzzy
#   --- START
    qwerty

        1 2 3 4 5 6
8 9 10 The end

# abcdefghi
        jklmnop
_END_

$mark = Text::Clip->new( data => ... )->find( qr/#\s*--- START/ )
( $mark, $content ) = $mark->find( qr/ The end/, slurp => '[]' )

and then $content is literally this:

#   --- START
    qwerty

        1 2 3 4 5 6
8 9 10 The end

but wait, alternatively, if you do

( $mark, $content ) = $mark->find( qr/ The end/, slurp => '()' )

then $content is instead:

    qwerty

        1 2 3 4 5 6

👀 notice the difference between slurp => '[]' and slurp => '()' in those two examples — that's the whole point of the demo, iykyk.

💜 DESCRIPTION 💜

Text::Clip lets you mark and slice up a piece of text. 🧚 string matching (by regular expression, etc.) is what places the marks. the first mark is your main character: it lets you access the text coming before it and after it. then every subsequent mark lets you slurp up the text that got "clipped" between the marks. periodt. 💅

👑 AUTHOR 👑

Robert Krimen <robertkrimen@gmail.com>

📜 COPYRIGHT AND LICENSE 📜

This software is copyright (c) 2010 by Robert Krimen.

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

---

and that's the whole page, bestie 🫶 huge shoutout to perl v5.42.0, dated 2025-07-25, filed under Text::Clip(3) — she's iconic, she's documented, she's free software. slay. 💖✨🎀