*[רשימות](../perlfunc-by-category.md)*

# any

מחזיר אמת אם `BLOCK` מניב אמת עבור לפחות איבר אחד של `LIST`.

`any` מריץ את `BLOCK` פעם אחת לכל איבר של `LIST`, יוצר alias של [`$_`](../perlvar.md) לאיבר הנוכחי, ומחזיר ערך אמת ברגע שהבלוק מניב אמת. אם אף איבר אינו גורם לבלוק להיות אמת — לרבות המקרה שבו `LIST` ריקה — `any` מחזיר שקר. הוא לעולם לא מריץ את הבלוק יותר פעמים מהנדרש: התוצאה האמיתית הראשונה מכריעה את התשובה והאיברים הנותרים אינם נבדקים.

`any` אינו זמין ללא תנאי. זוהי מילת מפתח של הליבה מוגנת־תכונה שהוצגה ב־Perl 5.42; יש להפעיל אותה באמצעות:

```perl
use feature 'keyword_any';
```

[`List::Util::any`](../../List/Util/any.md) הוותיק, הזמין לפחות מאז Perl 5.20, מממש את אותה סמנטיקה כתת־שגרה. השניים ניתנים להחלפה בקוד יומיומי — יש לבחור במילת המפתח של הליבה כאשר רוצים תקורת קריאה מעט נמוכה יותר ופחות frame stack אחד בפרופילים, או ב־[`List::Util::any`](../../List/Util/any.md) כאשר נדרשים גם ייצואים אחרים של `List::Util` או תמיכה ב־Perl ישן מ־5.42.

## תקציר

```perl
use feature 'keyword_any';
any BLOCK LIST
```

## מה מוחזר

ערך בוליאני: ערך אמת אם איטרציה כלשהי של `BLOCK` הניבה אמת, ערך שקר אחרת. הצורה המדויקת של ערך האמת/שקר אינה מוגדרת — יש להתייחס להחזרה כבוליאני, אין להסתמך על קבלת `1` ו־`""` באופן ספציפי.

`LIST` ריקה מחזירה שקר. זוהי התשובה המתמטית הנכונה (כמת הקיום מעל תחום ריק הוא שקר) ותואמת ל־[`List::Util::any`](../../List/Util/any.md).

## מצב גלובלי שהפונקציה נוגעת בו

- [`$_`](../perlvar.md) מקבל alias לכל איבר של `LIST` בתורו בזמן ש־`BLOCK` רץ. ה־aliasing הוא מאותו סוג ש־[`map`](map.md) ו־[`grep`](grep.md) משתמשים בו: שינוי [`$_`](../perlvar.md) בתוך הבלוק משנה את איבר הרשימה עצמו. יש להשתמש במשתנה לקסיקלי בעל שם באמצעות `my $x = $_` בשורה הראשונה של הבלוק כאשר נדרש העתק בטוח.

## דוגמאות

בדיקה אם שורה כלשהי ברשימה תואמת לתבנית:

```perl
use feature 'keyword_any';
my @lines = ("foo\n", "bar ERROR baz\n", "quux\n");
if (any { /ERROR/ } @lines) {
    warn "log contains an error line\n";
}
```

בדיקת סף מספרי:

```perl
use feature 'keyword_any';
my @nums = (1, 4, 7, 12, 3);
print "over limit\n" if any { $_ > 10 } @nums;   # over limit
```

זיהוי דגל בשורת הפקודה, ללא טעינת מודול:

```perl
use feature 'keyword_any';
if (any { $_ eq '--verbose' } @ARGV) {
    $verbose = 1;
}
```

`any` ביחד עם [`all`](all.md) כבדיקת שפיות — לכל רשומה יש `id`, ולפחות אחת מסומנת פעילה:

```perl
use feature qw(keyword_any keyword_all);
my @records = (
    { id => 1, active => 0 },
    { id => 2, active => 1 },
);
die "malformed" unless all { defined $_->{id} } @records;
die "none active" unless any { $_->{active} } @records;
```

שימוש בגרסת `List::Util` כאשר אי אפשר להסתמך על Perl 5.42:

```perl
use List::Util qw(any);
print "found\n" if any { $_ eq 'needle' } @haystack;
```

## מקרי קצה

- **קצר־לוגי על התוצאה האמיתית הראשונה.** תופעות לוואי ב־`BLOCK` רצות רק עבור איברים שנבדקו לפני (וכולל) האיבר האמיתי הראשון. אין להשתמש ב־`any` כדי להפעיל לולאה שחייבת לגעת בכל איבר — יש להשתמש ב־`for` או [`map`](map.md) לשם כך.
- **`LIST` ריקה מחזירה שקר.** `any { anything } ()` הוא שקר מבלי להריץ את הבלוק כלל.
- **ה־aliasing של [`$_`](../perlvar.md) זהה ל־[`map`](map.md) ו־[`grep`](grep.md).** כתיבה ל־[`$_`](../perlvar.md) משנה את איבר רשימת המקור. הניב `any { my $x = $_; ... }` הופך את ההעתקה למפורשת.
- **[`return`](return.md) בתוך `BLOCK` חוזר מתת־השגרה העוטפת**, לא מ־`any`. כדי לסיים את הסריקה מוקדם עם ערך אמת ספציפי, יש לאפשר לבלוק להעריך לאותו ערך — `any` כבר עושה קצר־לוגי.
- **מילת מפתח של הליבה לעומת [`List::Util::any`](../../List/Util/any.md).** שניהם מממשים את אותה סמנטיקה. מילת המפתח של הליבה חוסכת frame קריאה ברמת Perl לכל הפעלה של `any` עצמו, שמופיע בפרופילינג צפוף; הבלוק עצמו עדיין רץ לכל איבר בשני המקרים. ערבוב שניהם באותו קובץ הוא חוקי אך מבלבל; יש לבחור אחד לכל קובץ.
- **אזהרת `experimental::keyword_any`.** מכיוון שמילת המפתח עדיין מסומנת ניסיונית, הפעלתה פולטת אזהרה בקטגוריה `experimental::keyword_any` בשימוש הראשון. יש להשתיק אותה באמצעות `no warnings 'experimental::keyword_any';` ברגע שהוחלט להסתמך על מילת המפתח.

## הבדלים מן ה-upstream

תואם מלא ל־Perl 5.42 upstream.

## ראו גם

- [`all`](all.md) — המקבילה של כמת הכלל; אמת אם ורק אם `BLOCK` מניב אמת עבור **כל** איבר
- [`grep`](grep.md) — אוסף כל איבר תואם; `scalar grep { ... } @list` בעל אותו ערך אמת כמו `any { ... } @list` אך מריץ את הבלוק עבור כל איבר
- [`List::Util::any`](../../List/Util/any.md) — צורת תת־שגרה מלפני 5.42 עם סמנטיקה זהה
- [`List::Util::first`](../../List/Util/first.md) — מחזיר את האיבר הראשון שעבורו הבלוק אמיתי, במקום ערך בוליאני; יש להשתמש בזה כאשר נדרש האיבר עצמו
- [`map`](map.md) — אותו חוזה aliasing של [`$_`](../perlvar.md), אך תמיד מבקר בכל איבר ואוסף תוצאות